open (my $in,'<',$liste) or die "Fehler: $!\n"; @jet_macs = <$in>; close $in;