Select Code to Download

#!/usr/bin/perl -w
use Data::Dumper;
...

print Dumper \%all;
# Then do other thing with %all