Help for this page
for my $host (...) { $ssh{$host} = Net::OpenSSH->new($host, ...); ... print STDOUT "SSHD is back up. Continuing...\n"; } }