open(HOST, $file ) or die "Can't open `$file': $!\n";
my @hosts = <HOST>;
close(HOST);
chomp @hosts;