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

[Satell]

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

[blackybr]

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