my $a = exists(&some_sub);
$a = exists(&foo::some_sub)
