Minor correction: object state serialization works for any blessed type in Perl, not just references to hashes. 
package XX;
sub new { bless([1,2,3],__PACKAGE__) }
package YY;
sub new { $abc="abc"; bless(\$abc,__PACKAGE__) }
package ZZ;
sub new { $ott=123; bless(\$ott,__PACKAGE__) }
package main;
use Data::Dumper;
print +(Dumper(new XX));
print +(Dumper(new YY));
print +(Dumper(new ZZ));
__OUTPUT__
$VAR1 = bless( [
                 1,
                 2,
                 3
               ], 'XX' );
$VAR1 = bless( do{\(my $o = 'abc')}, 'YY' );
$VAR1 = bless( do{\(my $o = 123)}, 'ZZ' );

[download]
You are right that state serialization only works when the state is entirely referenced through that blessed value. You could even say that it's breaking package encapsulation.

But state serialization is, as the name implies, writing the state of the object, not the state of the package which manages the object. If you want to implement a new object model on top of the one Perl has got already, including flyweight or inside-out, then your new object model will have to be responsible for any serialization tasks. Unfortunately, that means that packages with non-native object models must document that they need special handling for serialization.

--
[ e d @ h a l l e y . c c ]

In reply to Re^3: Can I serialize an object and have it remember it's type? by halley
in thread Can I serialize an object and have it remember it's type? by tphyahoo

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.