my $obj = MyClass->new();  # what if it returns undef on error?
if ($obj->can('top')       # dies!