> I need the code below to execute the sub double_check($host) but I
still
> want the while loop to continue exactly what it's doing.
>
> Is this possible with Perl|?
>
> while (1) {
> $p = Net::Ping->new("icmp", 4, 2); #Ping object. Uses icmp
> protocal
> foreach $host (sort keys (%host
List,
I need the code below to execute the sub double_check($host) but I still
want the while loop to continue exactly what it's doing.
Is this possible with Perl|?
while (1) {
$p = Net::Ping->new("icmp", 4, 2); #Ping object. Uses icmp
protocal
foreach $host (sort keys (%host)) {
