Your code

if (@ARGV="h") {
    ...
};
[download]

is not checking whether @ARGV contains the string "h", it assigns @ARGV = "h";. You should look at Getopt::Long and The Dynamic Duo --or-- Holy Getopt::Long, Pod::UsageMan! how to best implement command line parsing.