This looks quite a bit like Abigail's Inside Out Objects — briefly introduced in Re: Naming convention for Object Variables; and take a look at the nodes listed as a reference in Class::InsideOut - yet another riff on inside out objects..

Actually you are not storing the object itself somewhere in the class, because a hash can only use strings as hash keys. So setting

$objects{$obj} = $info_about_me;
[download]

is actually first stringifying the object — which works very well as long as you haven't overloaded the '""' operator — but it is no longer an actual reference. It's a different thing if you store the object somewhere in the hash value.

If you want to purge this info from the hash when the object is destroyed, you can do that in the DESTROY method. That's what the Inside Out Objects do.

sub DESTROY {
    my $self = shift;
    delete $objects{$self};
}
[download]