Select Code to Download

print map { "Key: $_ has Value:$self->{$_}\n" } keys %$self;
#                                   ~~               ~

use Data::Dumper;
...
print Dumper($self);