If you can do it in Unix, you can do it in Perl. 8-)

Please take a look at Net::FTP.