Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister

Re: Read the Dumper data back to a hash.

by kejohm (Hermit)
on Jun 21, 2010 at 08:46 UTC ( #845699=note: print w/replies, xml ) Need Help??

in reply to Read the Dumper data back to a hash.

I prefer to use the Data::Dump module, since it has a simpler interface and it doesn't try to set any variables, which makes it more convenient to use in most cases. Here is a sample of writing a structure to a file and reading it back again using Data::Dump:

#!perl use strict; use warnings; use Data::Dump qw(dump); # Create a complex structure my %hash = ( number => 42, string => 'This is a string', array => [ 1 .. 10 ], hash => { apple => 'red', banana => 'yellow' }, ); # See what it looks like print "Here is the structure before dumping to file:\n"; dump \%hash; # Print structure to file open my $out, '>', 'dump_struct' or die $!; print {$out} dump \%hash; close $out; # Read structure back in again open my $in, '<', 'dump_struct' or die $!; my $data; { local $/; # slurp mode $data = eval <$in>; } close $in; # See what the structure read in looks like print "Here is the structure after reading from file:\n"; dump $data; __END__

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://845699]
[Your Mother]: Pure white (well, dirty white :P)
[erix]: as a kid I had a painted bunting -- beautiful
[Your Mother]: I would love to see one. It would be a lifer.
[Your Mother]: Wait… maybe I did see one last year…
[Your Mother]: I saw what I thought was a Cuban trogon but they are too impossibly rare / never seen in the US. That guy might have been what I actually saw.
[LanX]: Good Night guys!
[LanX]: :)
[erix]: ciao LanX
[Your Mother]: “A main wintering area is southern peninsular Florida, from the Florida Keys”

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (5)
As of 2017-01-20 01:38 GMT
Find Nodes?
    Voting Booth?
    Do you watch meteor showers?

    Results (173 votes). Check out past polls.