hi;
lauffähig ist dein code aber nicht;
wie wäre es mit etwas, was ich einfach ausführen muss, damit ich direkt sehe wo's hackt!

PS: willkommen bei der perl-community.de