Your problem is that you are pushing the same variable reference into to list over and over. You need to localize %info with my, like so:

...snip...
foreach $dir(@dirlist) {
   my %info;
   my $newdir=($dest."\/".$dir);
   if (-f $absdir."\/".$dir) {
   %info=(
       driver =>"working",
...snip...
[download]

It's an easy mistake to make... unless you've got use strict running. Turn on use strict. :)

stephen