...
    $sub = Class->can("print");
    $sub = eval { $ref->can("fandango") };
    $ver = $obj->VERSION;

    # but never do this!
    $is_io = UNIVERSAL::isa($fd, "IO::Handle");
    $sub = UNIVERSAL::can($obj, "print");