Select Code to Download

if ($telnet_status =~ /open/) {
   logall("Trying $ip_addresss");
   audit_hardware_using_telnet($ip_address);
}

chomp(my @list = <$fh>);