rlm@38: #!/usr/bin/perl
rlm@38: 
rlm@38: use Storable;
rlm@38: use Data::Dumper;
rlm@38: $Data::Dumper::Indent = 1;
rlm@38: 
rlm@38: 
rlm@38: 
rlm@38: $ref = retrieve('file');
rlm@38: 
rlm@38: print Dumper $$ref;