Dateien in Array abschneiden

[Philipp Hasenfratz]

Halihallo

wie kann ich jetzt die Daten so dezimieren das sie so im @kat stehen:

Nachtschatten|N|http:balbla
Vampyres|V|http:niknak
Vampire|V|http:zappzerapp

my @arr = ('16|Nachtschatten|N|http:balbla', '15|Vampyres|V|http:niknak', '14|Vampire|V|http:zappzerapp');

for ( my $i=0; $i < @arr; $i++ ) {
   my @sub = split( /|/, $arr[$i] );
   $arr[$i] = join( '|', splice( @sub, 1 ) );
}

print join( "\n", @arr );

sowas?

Viele Grüsse

Philipp