Autor Tema: Re: Ejemplo para comenzar (Leído 4295 veces)

infinity_ml · « **en:** Lunes 20 de Mayo de 2002, 11:17 »

Hola a todos!!!
Bueno, no he comenzado a programar en Perl, solo he leido todo lo que he podido sobre este lenguaje, y he descargado los programas necesarios para configurar el interprete de Perl en Win2000 pro.
El tema ahora es como programar con Perl en paginas Web, por ejemplo, realizar un simple script que me muestre en la pagina web el valor de una variable.
¿Alguien me puede ayudar?
Gracias

Avalon · « **Respuesta #1 en:** Martes 21 de Mayo de 2002, 12:47 »

Hola

Bueno, como solo pides un pequeño ejemplo, te pongo un ejemplo que muestra el contenido de las variables de entorno.

Código: Text

 
#!/usr/bin/perl
 
print "Content-type:text/htmlnn";
 
$mensaje = "Este ejemplo muestra las variables de entorno";
 
print <<HTML;
<html><head><title>un ejemplo</title></head>
<body>
[b]$mensaje[/b]
 
HTML
;
 
foreach $key (sort(keys %ENV)) {
    print "$key = $ENV{$key}
n";
}
 
print "</body></html>";

Si lo subes a un servidor ten en cuenta que hay que subirlo en modo ASCII (algunos programas de FTP antiguos lo suben en BINARIO por defecto) y también que deberás darle permisos de ejecución al archivo.

Si tienes algún problema, desde aquí trataremos de ayudarte

Salu2,
Avalon

infinity_ml · « **Respuesta #2 en:** Martes 21 de Mayo de 2002, 17:19 »

Tengo algunas dudillas mas...
Veamos, tengo instalado en mi máquina Win2000 y IIS, si tomo el ejemplo, ¿puedo probarlo en mi propia maquina, sin subirlo a ningun servidor?.
Lo que pretendo es que mi máquina sea servidor virtual y poder probar el script antes de subirlo, porque indudablemente, lo que tengo que hacer (que aun no me lo han dicho) lo tendre que probar antes de subirlo al servidor Nt de la empresa.
Bueno, entonces realizo una pagina web junto con un enlace para que se ejecute el ejemplo y vere que ocurre.
Gracias por el ejemplo.
Un saludo

Avalon · « **Respuesta #3 en:** Martes 21 de Mayo de 2002, 17:36 »

Naturalmente !:)

Para probarlo en tu máquina debes tener configurado el servidor para que al acceder por navegador a los archivos .cgi y .pl los lea con el intérprete de Perl.

Si no lo tienes configurado creo que tengo algún documento por ahí que explica como hacerlo (había que tocar algunas cosas en el registro de Windows creo). Dímelo y te lo miro.

Salu2,
Avalon

infinity_ml · « **Respuesta #4 en:** Martes 21 de Mayo de 2002, 18:51 »

Pues si me haces el favor de mandarme el documento mi dirección es: "mariolopez5@yahoo.es"
Porque no me sale nada, asi que no debo de tener bien configurado el IIS para windows 2000, o eso creo yo!
Gracias de nuevo

Avalon

He mirado el documento y se refiere a la configuración del PWS (Personal Web Server). Si utilizas IIS versión 3.0 o menor, la configuración es muy similar a la de PWS pero si es la 4.0 o la 5.0 cambia un poco.

En esta dirección lo encontrarás bastante bien explicado, para todas las versiones de IIS:

http://cronopio.net/perl/faqs/perlwin32faq6.html

Espero que te sirva.

Salu2,
Avalon

infinity_ml

Una duda mas...
Como yo utilizo el interprete de perl "ActivePerl" la línea siguiente:
#!/usr/bin/perl
Debería cambiarla por:
#!c:perlbin
Es que no me funciona nada, estoy volviendome loco...

Avalon

Dudo que el problema esté en esa línea, la cuál se utiliza para indicar la ruta del interprete de Perl en servidores unix/linux. Pero utilizando el IIS, el script debería funcionar incluso quitando esa línea.

¿ Cuando intentas abrir el archivo .cgi (.pl, .plx u otra extensión que le hayas dado) te aparece algún mensaje de error en el navegador ?

infinity_ml

No me aparece ningun mensaje, simplemente me muestra el contenido del script en el explorador, o sea, el codigo de ejemplo que me publicaste en la primera pregunta.
Pero no ejecuta el script, sin embargo, si me voy a ms-dos y escribo "perl script.cgi" se ejecuta el ejemplo perfectamente, y muestra las variables, pero en una pagina html, cuando pulso sobre el link solo me muestra codigo

Avalon

Pues no se que puede ser:(

Si has seguido los pasos para configurar el servidor, debería de interpretarte el archivo correctamente cuando tecleas su dirección en el navegador. Comprueba que el intérprete está bien mapeado,
c:perlbinperl.exe %s %s, y que en el directorio donde esta el script hay permisos de ejecución de archivos.

Otra cosa no se me ocurre, a ver si hay suerte.

infinity_ml

Muchas gracias, ya lo he conseguido, voy a ver si realizo algun otro script para seguir provando...

Avalon

No hay de que:) me alegro de que ya te funcione.

Buena suerte y que te diviertas !;)