in reply to Replacing objects

Assuming I follow, what you need to do is bless the object into your new package. Since you seem to want to maintain all your previous referencial linking, you cannot change the underlying hash reference. Do you get your desired result with:
use 5.014; package OldObj { sub new {bless {}, __PACKAGE__} sub test { print "You're still using the old object!\n"; } }; package NewObj { sub new {bless {}, __PACKAGE__} sub test { print "Yuppie! This is the new object!\n"; } }; my $keep = OldObj->new(); # object_1 my $change = OldObj->new(); # object_2 my $ref1 = $change; # points to object_2 my $ref2 = $ref1; # points to object_2 # object_2 needs to be replaced with another object, # but the object_1 should still be ref 'OldObj' # ... code was added here ... bless $change, 'NewObj'; say ref($ref1); # should print 'NewObj' $ref2->test(); # should go to NewObj::test() $keep->test(); # should go to OldObj::test()
I could see this evolving into a maintenance headache, but that's a broader question.

#11929 First ask yourself `How would I do this without a computer?' Then have the computer do it the same way.

Replies are listed 'Best First'.
Re^2: Replacing objects
by trizen (Hermit) on Dec 18, 2013 at 19:30 UTC
    Wow, that simple? And I was thinking about copying, aliasing and stuff.
    
    Thank you very much. This solves my problem.