Select Code to Download

    use Win32::OLE::Variant qw(nothing);
    # ...
    $OleObj->Method($strFirstArg, nothing);