Hola. Uno de los requisitos de la aplicación que estoy desarrollando es que al dar clic a una imagen, abra una nueva ventana, pero no la abre, como esperaría. El código es el siguiente:
#! /usr/bin/perl -w
use CGI qw(:standard);
use CGI::Carp qw/fatalsToBrowser/;
use DBI;
use strict;
use URI::Escape;
use Switch;
use utf8;
my $JSCRIPT=<<EOF;
function ventana_anexos(pagina){
alert ("HOOOOLLLLAAA");
return;
var opciones="toolbar=no, location=no, directories=no, status=no, menubar=no,scrollbars=no, resizable=no, width=408, height=120, top=85, left=140";
window.open(pagina,"",opciones);
}
my $cgi = new CGI;
$cgi->charset('utf-8');
print $cgi->header(-type=> 'text/html',
-charset=>'utf-8');
print $cgi->start_html(-title =>"SISCAL", -encoding => "utf-8");
print<<"HTML";
<!DOCtype HTML PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<head>
<script type="text/JavaScript" src="/prototype.js"></script>
</head>
HTML
.
.
.
print<<"TITULOS";
<CENTER><TABLE BORDER=1 CELLSPACING=0 width="100%"><TR><TD>
</TD></TR>
TITULOS
while (@row = $sth->fetchrow_array) {
.
.
print "<TD ALIGN=CENTER>";
print "<FONT SIZE=2 FACE=ARIAL color=#000000>";
print<<"vamos";
<div align="center">
<input type="image" src="../../images/anexo_blue.png" widt="40" height="15"
onClick="javascript:ventana_anexos("http://10.26.2.6/cgi-bin/siscal/consulta_eventos.cgi)">
</input>
</div></TD>
.
.
Vamos.
El compilador de Google Chrome muestra el siguiente mensaje de error:
Uncaught SyntaxError: Unexpected token }
¿Me está faltando algo en el código? Les agradeceré sus valiosos comentarios.
Gracias y saludos.