<%ARGS> $object => undef <%INIT> return undef unless ref($object);