my(@hosts) = <FILE>;
chomp(@hosts);

foreach my $host (@hosts) {

    # mach etwas mit $host
}