foreach (@jet_macs) { # quatsch, sorry! ($mac2,$switch2) = split / /,$jet_macs[$_]; ($mac2,$switch2) = split / /,$_; # so ist richtig # und hier die Datei anlegen }