b) If you don't know whether @in is sorted:
undef %saw;
@out = grep(!$saw{$_}++, @in);
[...]"
Oioioi, kann man mit Perl schreckliche Sachen machen.
Ich hätte jetzt erst mal in Richtung
"cat datei sort uniq"
gedacht - *das* verstehe ich wenigstens noch ... und sort gibt es ja auch in perl, uniq nicht?
(Mit ist klar, daß pipen nicht die performanteste aller Lösungen ist. Aber schöööön ... :-)