Hallo,
Die Funktion, die Du suchst heißt 'splice'. In der Dokumentation 'perlfunc' findest Du sie übrigens unter "Functions for real @ARRAYs" oder mit
perldoc -f splice
Aber warum überprüfst Du nicht gleich beim einlesen? Dann kommen die unerwünschten Zeilen gar nicht ins Array. Prüfen mußt Du sowieso und dann wird das Array auch nicht größer als unbendingt notwendig:
open(FILE,'wasauchimer') or die 'so ein mist, hat nicht geklappt';
while(<FILE>)
{
push @array,$_ if(hier die bedingung);
}
close FILE;
open(FILE,'>wasauchimer') or die 'was soll das? schreiben geht auch nicht';
print FILE @array;
close FILE;
Grüße
Klaus