nicht angemeldet
Hi,
undef %saw;
@out = grep(!$saw{$_}++, @in);Oioioi, kann man mit Perl schreckliche Sachen machen.
och, dieses Beispiel geht doch noch ;-)
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?
Nein, nicht daß ich wüßte. Dazu gibt es dann halt Hashes.
(Mit ist klar, daß pipen nicht die performanteste aller Lösungen ist. Aber schöööön ... :-)
Leider ist es auch nicht betriebssystemunabhängig... auf einem M$-Server dürfte es schon wieder nicht klappen ;-)
Cheatah