http://qs321.pair.com?node_id=535961


in reply to Object Serialization Basics

I don't know in 2000, but in 2006 this doesn't work any more:
my ($newdata, @newdataset, %newdatagroup) = @$thawed;
@$thawed is an array containing three references; the first is put into $newdata, the other two end up in @newdataset:
print "$newdata - [@newdataset]\n"; __END__ SCALAR(0x81b5d78) - [ARRAY(0x81b5eb0) HASH(0x812cc00)]

Flavio
perl -ple'$_=reverse' <<<ti.xittelop@oivalf

Don't fool yourself.

Replies are listed 'Best First'.
Re^2: Object Serialization Basics
by chromatic (Archbishop) on Mar 11, 2006 at 20:09 UTC

    It worked that way in 2000, too. I updated the parent to be clearer about what happens. Thanks!