ok, vielen dank erstmal. soweit läuft es. nur was muss ich in die <> klamm schreiben, damit ich in der while schleife jede zeile der datei bekomme. mit $file gehts irgendwie nicht, da kommt er nie in die schleife.


for my $file(@files){
print "1\n";
while ($line = <$file>)
{something
}