Hi,
vielleicht hätte ich meinem Posting noch hinzufügen sollen, das es sich nur um einen Ausschnitt handelt ;)
das war uns schon klar und ändert nichts an den Antworten :-)
Cheatah
P.S.: Dein Script sollte übrigens mit
#!/usr/bin/perl -w
use strict;
beginnen. Was das bedeutet, erfährst Du in
perldoc perlrun
perldoc strict