Pues mira esta dirección
http://216.32.76.138/~ideariow/cgi-b.../dir_script.pl
lo subí ahí y funciona perfecto !!!
El código exacto es este:
Código:
#!/usr/bin/perl
use strict;
my $dir = "mdi";
opendir (DATABASEDIR, "$dir") || &error('abrir','directorio');
my @files = readdir (DATABASEDIR);
closedir(DATABASEDIR);
shift @files;
shift @files;
print "content-type: text/html \n\n";
print '<table border="2">';
foreach my $file (@files){
print"<tr><td>$file</td></tr>\n";
}
print "</table>";
sub error {
print "content-type: text/html \n\n";
print "Error: Cant $_[0] the $_[1]";
print "<br><br>comunicate con Esteban Quintana";
exit;
}
exit(1);
Simplemente lo subi EN MODO ASKII le di permisos de ejecusión CHMOD 755 y le cree la carpeta mdi cargándole un par de archivos...Metete en
http://216.32.76.138/~ideariow/cgi-b.../mdi/gaita.txt
Ahí verás uno de los archivos...
Pues debería de funcionarte...No se que más decirte, podés darme acceso a la carpeta cgi ? oi a alguna subcarpeta que vos designes ?
Saludos