Select Code to Download

#!/usr/bin/perl -w
use Data::Dumper;
...
my $data = do { local $/; <FILE> };
my %newhash = %{eval $data};

use Storable;
store \%hash, '/tmp/hash';
my %newhash = %{retrieve('file')};