Just a remark to add.
Weak references are available only in perl 5.6 or higher (production branch). There is no support of weakref in widespread 5.005_3 version of perl.

In perl 5.005_3 you can't do just nothing about circular refs. The only thing you can do is give user a chance to release reference cycle manualy (by calling $o->release method for example).