@pq: fuer sowas finde ich es ja (leider) noetig

Anmerkung zu meinem Code von oben:
local sollte man ausser bei "eingebauten" Perl-Variablen nicht mehr verwenden