10台のサーバーのうち2台でエラーが発生しているため、ここで何が問題なのかわかりません。
sun09 に接続できません: Net::FTP: deploy_update.pl 行 204 のホスト名 'sun09:' が正しくありません。
奇妙なことに、次のコード抽出はループ内で機能し、一部のサーバーでは機能しますが、sun09サーバーに接続できません。
$ftp = Net::FTP->new("$hostname:$ftp_port", Debug => 0)
or die "Cannot connect to $hostname : $@";
$ftp->login($iLogin,$iPass)
or die "failed ", $ftp->message;
$ftp->binary()
or die "Cannot set to Binary";
$ftp->delete("/admin/replicate/inbound/$file");
#or warn $ftp->message;
$ftp->cwd("/admin/replicate/inbound")
or die "Cannot change working directory ", $ftp->message;
$ftp->put("$file")
or die "Upload Failed ", $ftp->message;
$ftp->quit;
これは 10 台中 8 台のサーバーで機能しますが、sun08およびでは機能しませんsun09。