foreach $data (@alledateien) { open (IN, "$data") || die "kann die Dateien nicht öfnnen"; #Dateien öffnen @alles = ; }