tengo este script Perl sentado en la carpeta cgi-bin de mi servidor Apache:¿Cómo puedo informar continuamente al usuario sobre el progreso de una secuencia de comandos Perl CGI?
#!/usr/bin/perl
use strict;
use warnings;
$| = 1;
print "Content-type: text/html\r\n\r\n";
print "Hello there!<br />\nJust testing .<br />\n";
my $top = 5;
foreach (1..$top) {
print "i = $_<br />\n";
sleep 1;
}
Lo que quiero lograr aquí es una actualización gradual de la página web para mostrar al usuario un estado actualizado. Sin embargo, lo que realmente obtengo es todo el resultado a la vez, después de un retraso de 5 segundos.
¿Hay alguna manera de que pueda escribir un script que es capaz de mantener informados a los usuarios de su progreso? Tengo un script que tarda mucho tiempo en terminar y me gustaría poder ver su progreso en tiempo real en lugar de todo el script para terminar.
También han tratado de establecer el modo de descarga automática de apagado ($ | = 0), pero incluso eso no hace nada.
¿En qué versión de Apache estás? más nuevo que 1.3? – Hasturkun