Noch blicke ich da leider nicht 100%ig durch, aber das war ja auch meine erste Begegnung mit Perl.
Jedenfalls Danke für deinen Tipp! Habe den Code so umgeschrieben wie du vorgeschlagen hattest, vielleicht kann ich mir das ja so angewöhnen :D Funktioniert natürlich immer noch genau so :)