A simple example

use strict;
use warnings;
use Storable;
my %table=(
    a => 1,
    b => 2,
    c => 3
);
store \%table, 'file';
[download]

use strict;
use warnings;
use Storable;
use Data::Dumper;
my $hashref = retrieve('file');
print Dumper $hashref;
[download]