$val="FOO";
$method="${val}::mySub";
if (exists &$method) {...}

##</code><code>##

if ($val->can("mySub")) { ... }