Select Code to Download

use strict;
use warnings;
use Storable qw(nstore);
...

## store to disk
nstore (\%data, "data.nstore");

use strict;
use warnings;
use Storable qw(retrieve);

my %data = %{ retrieve("data.nstore") };