Estoy tratando de acceder a un directorio y de leer los archivos que están en él.
Perl accede sin problema al directorio pero no puede abrir los archivos.
Los comandos que uso son:
Using perl Syntax Highlighting
chdir($dir);
open(PAGE,$diry.$dirx);
@arrayentrada=<PAGE>;
print @arrayentrada;
open(PAGE,$diry.$dirx);
@arrayentrada=<PAGE>;
print @arrayentrada;
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
¿Podrían decirme cuál es el error en los comandos que estoy usando?
Gracias de antemano.
STM
