use constant TIMEOUT => 5; # seconds, for traceroutes #### open(HOST, $file ) or die "Can't open `$file': $!\n"; my @hosts = ; close(HOST); chomp @hosts;