Здравствуйте, DmitryZhariy, Вы писали:

S_D>>Но оба способа не есть чистый перл . Вот и хочется узнать как ГУРУ копирую папки.

DZ>Если хочешь можешь использовать модуль File::Find для рекурсивного поиска файлов и каталогов, потом читать содержимое файла в binmode со старого путя в новый....

Вот нашел на CPAN-е модуль: File-Copy-Recursive.
Во-первых, Stas_Dragon, это пел-модуль. (Хотя насколько «пелануто» он там организован я не смотрел.)
Во-вторых, Дима, не понадобиться делать рекурсию самому. Говорят, он сам это делает (: