This is how I do it with a hash but there may well be a better way.

To store a hash:

open (FILE,">filename");
print FILE Data::Dumper->Dump([\%hashname],['*hashname']);
close(FILE);
[download]

To read it back in:

open (FILE1,"filename");
undef $/;
eval <FILE1>;
close(FILE1);
[download]