Select Code to Download

bash-4.2$ cat dump
use Data::Dumper;

...
        );

print Dumper( \%hash ) . "\n";

 
bash-4.2$ perl dump
$VAR1 = {
...
                         'test1'
                       ]
        };