>>10

Net:FTP使ってみました。
------
use Net::FTP;

my $ftp = Net::FTP->new($server, Debug => 1);
$ftp->login($user, $pass);
$ftp->cwd($dir);
$ftp->get($file);
$ftp->quit;
------

こんな感じで使ってみると、指定ディレクトリ($dir)以下にある指定ファイル($file)はダウンロードできましたが、
これだと、指定ファイルのみダウンロードになってしまいます。
どーにかして指定ディレクトリ毎落とすことはできないのでしょうか？