Foro - Perl en Español

Lo que pasa es que tengo secciones de hasta el nivel 3. Cada sección puede tener carpetas dentro. Ejemplo sería



¿Cómo puedo representar alguna jerarquía así en Perl? Bueno, la idea no es cómo representarla si no cómo puedo aplicar una función si yo quiero por lo menos mover baños dentro de citricos.

1. Mover todas las carpetas si tienen mucho archivo, ¿consume mucho servidor?
2. ¿Hay algo en Perl que haga algo parecido? Debo de tener en cuenta que no pueden existir carpetas con el mismo nombre en el mismo nivel, aplicando alguna especie de tree.

use File::Copy::Recursive;