Ayuda con script

Alextroy · #1 (**permalink**) 18/03/2005, 03:22

Hola, estoy empezando ahora con Perl y como nó, ya me he tropezado con el primer problema. Mirad, tengo este Script:
#!/usr/bin/perl -w
print "Content-type: text/plain\n\n";
print "<html><body>hola</body></html>";
close;

Y se me habre la pagina con lo de "hola". Pero sin embargo, si utilizo este otro método me da error:

#!/usr/bin/perl -w
print "Content-type: text/plain\n\n";
print <<FIN;
<html><body>hola</body></html>
FIN;
close;

Tengo entendido que así deberia funcionar, he probado con todas las conbinaciones posibles y nada. A ver si alguien sabe decirme donde está el error. Me seria de gran ayuda.
Gracias

Alextroy · #2 (**permalink**) 18/03/2005, 04:30

Vale valeeeee...no os tireis todos de golpe a contestar...ya he dao yo con la tela.
Resulta que el gracioso del que yo me decargué el manual habia escrito Print >>FIN;, en vez de print <<FIN;. Que cosas ¿eh? y yo sin darme cuen....
En fin, gracias de todas formas.

monoswim · #3 (**permalink**) 18/03/2005, 06:05

Hola, antes que nada Bienvenido al foro !!!!!!!

Para que sepas cuando escribiste este mensaje en mi país eran las 6AM con lo cual estaba en el más profundo y placentero de mis sueños...Quedate tranquillo que me meto a diario en estos foros y sobretodo en el de CGI...

Me alegra que lo hayas solucionado pero te comento un detalle...a lo último usas close...La verdad es que nunca vi eso de close, en perl se usa exit;

Para finalizar el script debes usar exit;

Y puedes pasarle algún parámetro de salida...

exit(1);

Espero que te sirva
Saludos