aaron crane ogkfaaroncranecouk juerd waalboer writes anyone know wasnt done much simpler way sub refaddr ref_0 0_0 undef overloading cat opl use strict package c use overload sub 17 sub new bless _0 sub refaddr ref_0 0_0 undef x cnew cnew print refaddr x print refaddr perl wl opl 17 17 aaron crane wed 06 aug 2008 012443 0100 scalarutilrefaddr