It looks like my fellow monks have corrected you, but I would like to offer a helpfull perl hint. When wanting to test a script before running it try this at the command line

perl -cwTM-strict ./yourscript.pl
[download]

This will help debug your code without actually running it and possiblyt messing something up.

USE PERL