The problem is that $min is returned from localtime as "2" instead of "02", the same with hours for that matter you could do something like the following:

my ($min,$hours) = (localtime)[2,3];
my $now = $hours . sprintf ("%02",$min);
[download]

-enlil