FTPする (module)Net-FTP

オプションモジュール
Net/FTP.pm と、Net/FTP/ 以下が必要
http://search.cpan.org/~gbarr/libnet-1.18/Net/FTP.pm
対象サーバへ FTP ログインし、任意のコマンドを実行

----
use Net::FTP;

$ftp = Net::FTP->new("ftp.example.org") or die "cannot connection: $@\n";
$ftp->login("username", "password") or die "cannot login: ", $ftp->message;

$ftp->cwd("/home/username") or die "cannot chdir: ", $ftp->message;

$ftp->binary;
$ftp->get($file_remote, $file_local) or warn "cannot get: ", $ftp->message;

$ftp->ascii;
$ftp->put($file_local, $file_remote) or warn "cannot put: ", $ftp->message;

$ftp->rename($oldname, $newname);
$ftp->delete($file_dele);

$ftp->mkdir($remote_dir, 1);  # if $arg2 is true: recurse
$ftp->rmdir($remote_dir);

$ftp->quit;