Select Code to Download

$VAR1 = {
          'A1' =>  {
...
                 'val3' => [25],
                 'val4' => [11]     
       };

my %data;

...
    print"$key : $hash{$key}->{$val}";
}
}