nicht angemeldet
Hi,
wie wir alle wissen, kann ich mit
undef %saw;
@out = grep(!$saw{$_}++, @in);
die doppelten Elemente einer Liste herausfiltern.
Wie kann ich mir aber diese doppelten Elemente anzeigen lassen, oder in eine @dopp schreiben lassen?
Grüß Euch
Ted
Hi,
ich ahbe selber eine Lösung gefunden:
foreach $key (sort { $a <=> $b } keys %saw) {
if ($saw{$key} > 1) {
print "$key";
}
}
Trotzdem die frage, gibt es eine effizientere???
Ted