Select Code to Download

    $hash{$var_p} = $var;

use strict;
use warnings;
...
@hash{@keys} = @values;

print Dumper \%hash;