Have you already tried something like this?

use Storable;
use Data::Dumper;
print Dumper retrieve('filename');
[download]

        $perlmonks{seattlejohn} = 'John Clyman';