Ich hoffe sehr, dass Du die Dinge noch nacharbeitest, die Dir hier empfohlen wurden falls Du vorhast, mehr in Perl zu machen.

Denn 100 % sauber ist Dein Script jetzt nicht! Das sollte Dir bewußt sein!