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