#!/usr/bin/env perl

use strict;
use warnings;

use Storable;
use XML::Simple;

my $file = 'pm_1078041_store';

`pm_1078041_child.pl`;

my $hashref = retrieve $file;

my $xml = XML::Simple->new->XMLout($hashref);

print $xml;

##</code><code>##

#!/usr/bin/env perl

use strict;
use warnings;

use Storable;

my $file = 'pm_1078041_store';

my $hashref = {
    key1 => 'qwerty',
    key2 => 'asdfgh',
    key3 => {
        A => 1, B => 2, C => 3,
    },
    key4 => [5, 6, 7],
};

store $hashref => $file;

##</code><code>##

$ pm_1078041_parent.pl
<opt key1="qwerty" key2="asdfgh">
  <key3 A="1" B="2" C="3" />
  <key4>5</key4>
  <key4>6</key4>
  <key4>7</key4>
</opt>