Рекурсивное копирование ftp perl
 

Есть ли готовая ф-я, чтобы в перле NET::FTP скопировать рекурсивно папку с файлами и папками на сервер, аналог php putRecursive?

http://www.cpan.org/authors/id/S/SR/SRSHAH/webupload-1.53.pl