
[1]
[CODE(perl)[bless]] 結果は[[参照]]の属性のようなものであってそれを入れる[[変数]]の属性のようなものではありません。
[PRE(perl example code)[
$a = bless {}, 'A';
$b = $a;
print ref $a, "\n"; # A
print ref $b, "\n"; # A
]PRE]

ですから、あとから [CODE(perl)[bless]] し直すと、
すべての[[変数]]に影響します。
[PRE(perl example code)[
$a = {};
$b = bless $a, 'B';
$c = bless $b, 'C';
print ref $a, "\n"; # C
print ref $b, "\n"; # C
print ref $c, "\n"; # C
]PRE]
