Nicht übel!!

Vielen Dank renee. Ist so ziemlich genau das was ich wollte und vor allem so schnell ... die Ausführung kommt ja in weniger als 1sek und es handelt sich um je eine Datei mit rund 14000 Zeilen.

Hab noch ein "sort {$Hash{$b} <=> $Hash{$a}}" in Zeile 23 mit eingebaut um absteigend nach Häufigkeit zu sortieren.

Grüße