if (ref $code) {
    if ($code->()) {  # explicitly
        ...
    }
}