Na, das hört man doch gern, wenn was funktioniert. ;)

Eins noch: Dieses "foreach ...", um die Elemente einer Liste auszugeben, ist zwar so auch Standard, aber auch relativ umständlich zu schreiben, insbesondere, wenn man's schnell zum Debuggen braucht.
Es gibt da noch eine kürzere Schreibweise (die mir mal pq genannt hat):
Voraussetzung dafür ist allerdings ein Perl mindestens in Version 5.10 ("perl -v"), heute eigentlich üblich (5.14 ist gerade aktuell). Also:
Dann oben ins Skript einfügen:

Dann kannst Du Deine Liste nur mit

ausgeben. Das ist eine Kurzform von

Sonst tippt man sich ja'n Wolf. ;)