Select Code to Download

my @aoh;

...
        push @aoh,\%filehash;
        $x++;
    }

sub filetohash {
...
...
    push @aoh,filetohash($file);
...