$ perl -MSubClass -le 'print SubClass::->new()->get_subclass_object()'
SubClass=HASH(0x7fb6698259a8)