Perl en Español

  1. Home
  2. Tutoriales
  3. Foro
  4. Artículos
  5. Donativos
  6. Publicidad
 
Índice general » Mundo Perl » Web » Comenzando en Perl: Mi CGI no ejecuta Responder al tema
Nuevo tema


Página 1 de 1  [ 5 mensajes ] 
 
Nota 2006-03-09 10:13 @467

Perlero Nuevo
Registrado: 2006-02-21 15:23 @683
Mensajes: 7
Comenzando en Perl: Mi CGI no ejecuta
Hola de nuevo, hacía días que no me pasaba por el foro =). Veréis, sigo con los ejemplos del libro que os mencioné, Aprendiendo CGI de O'Reilly. Al siguiente ejemplo, no le encuentro nada mal pero no lo llega a ejecutar, se queda como cargando, aquí está el código:

#!C:\Perl\bin\perl
$server_protocol = $ENV{'SERVER_PROTOCOL'};
$server_software = $ENV{'SERVER_SOFTWARE'};
print "$server_protocol 200 OK", "\n";
print "Server: $server_software", "\n";
print "Content-type: text/plain", "\n\n";
print "OK, Here I go. I am going to count from 1 to 50!", "\n";
$| = 1;
for ($loop=1; $loop <= 50; $loop++) {
print $loop, "\n";
sleep (2);
}
print "All Done!", "\n";
exit (0);

Lo ejecuto a traves del servidor, y se queda cargando, en teoría tendría que empezar a contar del 1 al 50, pero no hace nada. He probao a aumentar el tiempo a la función sleep y na de na. El apache que estoy usando no es el último, pero el libro tampoco es que sea del 2005/2006.
Alguna idea buena por aquí? ;o)


Nota 2006-03-09 10:27 @477
Avatar de Usuario
Creador de Perl en Español
Registrado: 2003-10-15 16:52 @744
Ubicación: México
Mensajes: 1163
Hola:

Te convendría checar si realmente en la primera línea está bien la ruta de tu Perl:

Código:
#!C:\Perl\bin\perl


Ahora, porque no intentas con un código como el siguiente:

Código:
#!C:\Perl\bin\perl

$| = 1;

print "Content-type: text/html", "\n\n";
print "OK, Here I go. I am going to count from 1 to 50!", "<br>\n";

    for my $loop (1..50) {
        print $loop, "<br>\n";
        sleep (2);
    }

print "All Done!", "\n";

exit (0);



SALUDOS

_________________
Uriel Lizama Perl programmer fundador de Perl en Español


Nota 2006-03-09 13:53 @620
Avatar de Usuario
Administrador
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España
Mensajes: 10249
Re: Que le pasa a este script?
barbanegra_2005 escribió:
Código:
#!C:\Perl\bin\perl
$server_protocol = $ENV{'SERVER_PROTOCOL'};
$server_software = $ENV{'SERVER_SOFTWARE'};
print "$server_protocol 200 OK", "\n";
print "Server: $server_software", "\n";
print "Content-type: text/plain", "\n\n";
Por de pronto, veo que envías el Content-type después de un par de líneas.
Ponlo al revés. Primero el Content-type, seguido de una línea en blanco, y luego todo lo demás.


Nota 2006-03-10 09:21 @431

Perlero Nuevo
Registrado: 2006-02-21 15:23 @683
Mensajes: 7
Gracias por las respuestas kidd y explorer ;), he probao ambos metodos y no se porque no van :? puede que sea por la version del apache, es la 1.3.34, pero no veo el por que.

La version de Perl tampoco creo que sea, estoy usando el ActivePerl 5.6. He comprobao la ruta del perl que hay que poner en el script y es correcta, no se, tiene que ser algo mal configurado porque que no funcione ninguna de las 3 versiones ya me resulta rarrorarrorarro, sobre todo porque el resto de scripts que le meto me rulan, he probao con ejecutables en exe y tambien.

A ver si hay suerte, voy a probar con otra del apache y os cuento ;)


Nota 2006-03-10 10:06 @463
Avatar de Usuario
Creador de Perl en Español
Registrado: 2003-10-15 16:52 @744
Ubicación: México
Mensajes: 1163
Hola:

Aquí en el sitio puedes encontrar una guía que te muestra como configurar un servidor Apache+Perl en un entorno de Windows. Quizá te convenga guiarte en él para hacer los cambios que necesitas.

http://perlenespanol.baboonsoftware.com ... 00049.html

Saludos

_________________
Uriel Lizama Perl programmer fundador de Perl en Español


Responder al tema  [ 5 mensajes ] 

Reglas del Foro
No puedes abrir nuevos temas en este Foro
No puedes responder a temas en este Foro
No puedes editar tus mensajes en este Foro
No puedes borrar tus mensajes en este Foro
No puedes enviar adjuntos en este Foro

Publicidad

Socializa

Síguenos por Twitter

Suscríbete GRATUITAMENTE al Boletín de Perl en Español

Saltar a:  
cron
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Traducción al español por Huan Manwë para phpbb-es.com
phpBB SEO