sub search { my $invocant = shift; if (ref($invocant)) { $invocant->_set_search(); } else { $invocant->_instance_search(); } }