[Perl] AYUDA....

Mon, 1 Jul 2002 17:21:25 -0500 (CDT)

En la segunda l=EDnea:

> $bodyuno=3D$bodyuno."(\'http\:\/\/\".$maindomain."\')\">";
                                   ^             ^
La primer comilla (antes del par=E9ntesis) no est=E1 escapada, todo bien. L=
a
segunda, antes del .$maindomain est=E1 escapada, por lo que no cierra la
cadena - Es la causante de la bronca, aunque Perl no se muere ah=ED, pues
sigue interpretando una cadena v=E1lida.. La tercer comilla (despu=E9s del
$maindomain.) no est=E1 escapada, con lo que declara terminaci=F3n de la
cadena. Despu=E9s de ella viene un backslash, y ah=ED es donde se muere Per=
l.

Te sugiero simplificar y substituir esta expresi=F3n por:

$bodyuno=3D"$bodyuno('http://$maindomain')>";

Mucho m=E1s f=E1cil de leer ;-) La bronca aqu=ED es que pecas de entrecomil=
lar
de m=E1s - Por un lado, puedes usar la interpolaci=F3n de las comillas dobl=
es.
Por otro lado, s=ED, requerir=E1s escapar algunos caracteres (como \$, \@,
\"), pero son los menos.

Saludos,

> Tengo una bronca estoy corriendo un script de perl y me esta marcando est=
e error cuando lo corro:
>
> Backslash found where operator expected at linkshtm.pl line 13, near ""\(=
\'http\:\/\/\".$maindomain; # " \"
>         (Missing operator before  \?)
> syntax error at linkshtm.pl line 13, near ""\(\'http\:\/\/\".$maindomain;=
 # " \"
> Can't find string terminator "'" anywhere before EOF at linkshtm.pl line =
13.
>
>
> Estas son las lineas que me estan dando bronca:
>
> $bodyuno=3D"<BODY onLoad\=3D\"javascript\:popUp";
> $bodyuno=3D$bodyuno."(\'http\:\/\/\".$maindomain."\')\">";
>
> Nose si me estoy quedando ciego o que ondas porque no puedo ver donde est=
a el error. Les agradecere si me pueden ayudar con esto.
>
> Saludos,
> Luis
>
>
> ___________________________________________________
> Todito.com, tu centro de comunicacion, informacion,
> comercio y entretenimiento en Internet.
>
>
>
>
> _______________________________________________
> Perl mailing list
> Perl@tlali.iztacala.unam.mx
> http://tlali.iztacala.unam.mx/mailman/listinfo/perl
>

--=20
Gunnar Wolf - gwolf@campus.iztacala.unam.mx - (+52-55)5623-1118
PGP key 1024D/8BB527AF 2001-10-23
Fingerprint: 0C79 D2D1 2C4E 9CE4 5973  F800 D80E F35A 8BB5 27AF