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

S_D>Как в Perl (5.8) правильно копировать папку с её подпапками и файлами?

S_D>P.S.S
S_D> Я пока нашёл только два способа:
S_D>1) использование модуля win32::OLE с помощью методов объекта Scripting.FileSystemObject
S_D>2) использование системной команды xcopy и Perl функции system()
S_D>Но оба способа не есть чистый перл . Вот и хочется узнать как ГУРУ копирую папки.

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