FTPを使用してローカルディレクトリをリモートディレクトリと段階的に同期できるperlスクリプトを書いています。各ファイルの最終更新日をチェックし、それを 1 つのリモート ファイルと比較します。次のコードを使用して、FTP 経由で最終変更時刻を取得します。
my $f = Net::FTP->new($config->{'host'}, Passive => 1, Debug => 0) || die "Couldn't ftp to $config->{'host'}: $@";
$f->mdtm($file);
ローカル マシンとリモート マシンの時刻とタイムゾーンが同じであれば問題なく動作しますが、そうでない場合は回避策が必要です。
前もって感謝します