Siechfred: Doppelte Listeneinträge entfernen

Beitrag lesen

Hell-O!

wie sag ichs in perl wenn mein $_ aus mehreren positionen besteht und ich davon nur das dritte element brauche?

Vorschlag: Kombiniere map und grep:

my @in = ('1;foo', '2;bar', '3;baz', '4;foo', '0;baz;2');  
my %saw;  
my @out = grep(!$saw{$_}++, map((split(';', $_))[1], @in));

Lediglich die Indexnummer deines split musst du noch an deine Bedürfnisse anpassen.

Siechfred

--
Ich bin strenggenommen auch nur interessierter Laie. (molily)
Zitat des Tages || Falle Aufteilungsbescheid || RT 221 Erfurt-Altstadt i.V.