As others have noted, always start your Perl scripts with the following:

#!/usr/bin/perl -w

use strict;
use warnings 'all';
[download]

It can help prevent many bugs that otherwise would not have been obvious.