Привет! Столкнулся с такой проблемой. У меня есть список ftp хостов, к которым я по очереди конекчусь и забираю от туда файлы. Выявилась такая проблема, что при недоступности какого то из этих хостов, цикл прерывается. Каким образом можно обойти это? А то что то я не соображу. :(
| Код |
my $query = "SELECT t.fix_switch_id, t.ip_address, t.ftp_port, t.ftp_login, t.ftp_pas FROM nss_fix_switch t";
my $result = DB::sql_q($query);
my $i;
my $ftp_host;
my $ip_address;
my $ftp_port;
my $ftp_login;
my $ftp_pass;
for ($i=0; $i<@$result; $i++) {
$ip_address = $result->[$i][1];
$ftp_port = $result->[$i][2];
$ftp_host = $ip_address.":".$ftp_port;
my $ftp = Net::FTP->new($ftp_host) or die "Can't connect to $ftp_host: $@ \n";
$ftp_login = $result->[$i][3];
$ftp_pass = $result->[$i][4];
$ftp->login($ftp_login,$ftp_pass) or die "Can't login \n";
$ftp->binary();
}
|
|
)
