Eigentlich sollte das:
splice @datei,$_,1;
kombiniert mit dem:
Argument "<username>Dauna</username><name>Nicole</na..." isn´t numeric ...
und der Lektüre von perldoc klar werden lassen, was der Fehler ist. Du musst splice nicht den Inhalt der Zeile ($_), sondern den aktuellen Index übergeben.
Das Problem ist, dass Dir der Index in einer for/foreach-Schleife nicht von Perl geliefert wird, Du musst also mitzählen. Das könnte dann so aussehen:
my $i = 0;
foreach(@arr) {
splice @arr, $i, 1 if /$pattern/;
$i++;
}
Siechfred
--
Obacht, hinter jedem noch so kleinen Busch könnte ein Indianer sitzen!
Obacht, hinter jedem noch so kleinen Busch könnte ein Indianer sitzen!