• Publicidad

Comprobar el uso de fastcgi

Todo lo relacionado con el desarrollo Web con Perl: desde CGI hasta Mojolicious

Comprobar el uso de fastcgi

Notapor danimera » 2012-09-22 11:18 @512

Tengo este código y lo subí a mi hosting pero, ¿cómo puedo saber si de verdad está corriendo con el fastcgi o mod_fastcgi o, bueno, no sé cómo sea...

La URL es:

http://kreatibox.com/index3.cgi

y el código que tiene es:
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1.     use CGI::Fast qw(:standard);
  2.     $COUNTER = 0;
  3.     while (new CGI::Fast) {
  4.         print header;
  5.         print start_html("Fast CGI Rocks");
  6.         print
  7.             h1("Fast CGI Rocks"),
  8.             "Invocation number ",b($COUNTER++),
  9.             " PID ",b($$),".",
  10.             hr;
  11.         print end_html;
  12.     }
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4


imagino que no lo tengo, porque ese $counter debería aumentar en cada visita ¿O me equivoco ?
100% Telch - Perl Web Programming
Cali PerlMongers: http://cali.pm.org
Avatar de Usuario
danimera
Perlero frecuente
Perlero frecuente
 
Mensajes: 871
Registrado: 2005-06-23 19:02 @834
Ubicación: Colombia

Publicidad

Re: Comprobar el uso de fastcgi

Notapor explorer » 2012-09-22 11:27 @518

La documentación dice que necesitas tener instalado el módulo FCGI. ¿Lo está?
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Re: Comprobar el uso de fastcgi

Notapor danimera » 2012-09-22 11:35 @524

En mi hosting veo que lo tengo instalado,
probé con este código:

http://kreatibox.com/novedad.pl

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. #!/usr/bin/perl -w
  2. use CGI qw(:all);
  3. use CGI::Carp qw(fatalsToBrowser);
  4. use warnings;
  5.     use FCGI;
  6.  
  7. # Initialization code
  8.  
  9. $cnt = 0;
  10.  
  11. # Response loop
  12.  
  13. while (FCGI::accept >= 0) {
  14.   print "Content-type: text/html\r\n\r\n";
  15.   print "<head>\n<title>FastCGI Demo Page (perl)</title>\n</head>\n";
  16.   print  "<h1>FastCGI Demo Page (perl)</h1>\n";
  17.   print "This is coming from a FastCGI server.\n<BR>\n";
  18.   print "Running on <EM>$ENV{SERVER_NAME}</EM> to <EM>$ENV{REMOTE_HOST}</EM>\n<BR>\n";
  19.    $cnt++;
  20.   print "This is connection number $cnt\n";
  21. }
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4

y pues funciona ...
100% Telch - Perl Web Programming
Cali PerlMongers: http://cali.pm.org
Avatar de Usuario
danimera
Perlero frecuente
Perlero frecuente
 
Mensajes: 871
Registrado: 2005-06-23 19:02 @834
Ubicación: Colombia

Re: Comprobar el uso de fastcgi

Notapor explorer » 2012-09-22 12:00 @541

A mí no me funciona: siempre marca '1' como conexión.

Según la documentación, los cgi para ser ejecutados como Fast-cgi deberían tener una extensión especial, como .fcgi. En la documentación de Apache se dice lo mismo.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Re: Comprobar el uso de fastcgi

Notapor danimera » 2012-09-22 12:08 @547

Bueno, ni modos... tengo acceso ssh pero no soy capaz con esas cosas de Linux. Ahí sí prefiero manejarlo desde IIS en Windows Server, es más fácil para mí, que no manejo Linux.
100% Telch - Perl Web Programming
Cali PerlMongers: http://cali.pm.org
Avatar de Usuario
danimera
Perlero frecuente
Perlero frecuente
 
Mensajes: 871
Registrado: 2005-06-23 19:02 @834
Ubicación: Colombia


Volver a Web

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 2 invitados