pq++ zeigt mir mal das man die eigenschaft der hashes dafür nutzen kann das dort schlüssel einmalig sein müssen.



grep iteriert ebenfalls durch alle elemente von @allkeys, dabei wird jedesmal der inhalt des aktuellen elementes ($_) als key im hash %seen benutzt und der wert dieses schlüssels um 1 erhöht (++). grep gibt aber nur die werte von $_ weiter, für die die Auswertung des Terms in den {} ein positives ergebniss liefert. Und dank des !, ist das ergebnis nur positiv wenn der hashwert leer war, also nur das erste mal bei jedem wert des arrays.