Foro - Perl en Español

¿Cómo puedo copiar un directorio entero en Perl, ojalá sin usar File::Copy...?

La idea es que tengo que clonar un directorio, por decirlo colocándole un nuevo nombre al directorio clonado...

No entiendo que no quieras usar File::Copy... viene incluido de base con Perl...

Hay otros módulos en CPAN que hacen la misma función, incluso mucho más fácil que File::Copy. Por ejemplo, File::Copy::Recursive:

Y si no... pues ya sabes... recorrer el directorio de forma recursiva, y por cada archivo encontrado, abrirlo en lectura y abrirlo en escritura y pasarlo de un sitio a otro (while (<>)), y crear los subdirectorios con mkdir... muchas líneas de código... los puedes copiar de File::Copy::Recursive

(Yo prefiero escribir dircopy(), que son 7 letras ).

Excelente, lo logré usando use File::Copy::Recursive qw(dircopy);

No quería usar File::Copy porque quería usar otra cosa más completa como use File::Copy::Recursive qw(dircopy); y sí que me sirvió...

Como siempre, gracias, explorer.