Select Code to Download

# --> This is an example configuration file, foo.conf
$default_profile = 'alpha';
...
    'beta' => { path => '/var/beta', recurse => 0 },
);
@resources = qw/ xyz abc def /;

use Config::Perl;

...

use Data::Dumper;
print Dumper($conf);

$VAR1 = {
  '$default_profile' => 'alpha',
...
  },
  '@resources' => [ 'xyz', 'abc', 'def' ]
};

use Data::Dumper;
$Data::Dumper::Purity=1;     # setting these two options like this
...
my @input = ( {foo=>"bar"}, ["Hello","World"], "undumping!" );
my $str = Dumper(@input);
my @parsed = Undump($str);

use Data::Undump::PPI qw/Dump Undump/;

Dump(\@state_out, file=>'state.pl');

my @state_in = Undump(file=>'state.pl');