my $identi = Win32::OLE->new('DefaultCertUserIdentification'); my $identified = $identi->IdentifyUserByCert($certificate, \$userTaxId, \$corpTaxId);