Foro - Perl en Español

En días pasados, Explorer me ayudo diciéndome cómo listar todos los archivos de un cierto directorio,

@ficheros = <*.*>;

y efectivamente funcionó muy bien.
Ahora necesito listar los sub-directorios que existen dentro de un directorio, no los archivos.
¿¿¿¿Hay alguna forma de hacerlo?????
Yo lo hice con,

system "dir *. /B > directories.txt";
y funciona pero tiene sus problemas con la seguridad de los directorios.
¿¿¿¿Alguien conoce otra opción, sin usar el comando system????
Espero que alguien me pueda ayudar.
Gracias de antemano.

Si hay problemas con la seguridad de los directorios, también los tendrás desde Perl. Es un tema de Windows y los permisos. Tendrás que entrar como administrador en el sistema y dar permisos de lectura a esos directorios al usuario que ejecutará el script Perl.

Para leer directorios en perl existen los comandos
Para buscar por todo el árbol de directorios de forma recursiva, también existe el módulo File::Find y allegados.

Oye Explorer:
Fíjate que me encontré por allí un artículo tuyo en el que le ayudaste a una persona a separar directorios de ficheros y con ese ejemplo ya pude lograr lo que yo quería.
Es decir yo sólo necesitaba los directorios y ya lo pude hacer.
Muchas gracias nuevamente.
Recibe un fuerte saludo desde Guadalajara,Mexico.

Hola. También, si quieres saber más de ficheros y directorios en Perl, no dudes en preguntarme ^^ me he especializado en eso y sobre todo bajo Windows. OK