Export Public Key to RSA DER, OpenSSL DER/PEM, XML

Demonstrates how to export a digital certificate's public key to RSA DER, OpenSSL PEM or DER, or to XML format.

Chilkat Module for Perl 5.8.*

Chilkat Module for Perl 5.10.*

use chilkat;

$cert = new chilkat::CkCert();

#  Th LoadByCommonName method searches the Windows
#  Current User Certificate Store and Local Machine Certificate
#  Store for a certificate whose common name (CN) matches
#  the argument:

$success = $cert->LoadByCommonName("Chilkat Software, Inc.");
if ($success == 0) {
    print "Failed to find certificate!" . "\n";
}
else {

    #  Get the PublicKey object:

    $pkey = $cert->ExportPublicKey();
    if (!($pkey eq null )) {

        #  Export the public key to an RSA DER file:
        $pkey->SaveRsaDerFile("pubkey_rsa.der");

        #  Export to an OpenSSL DER file:
        $pkey->SaveOpenSslDerFile("pubkey_openssl.der");

        #  Export to an OpenSSL PEM file:
        $pkey->SaveOpenSslPemFile("pubkey_openssl.pem");

        #  Export to an XML file:
        $pkey->SaveXmlFile("pubkey.xml");

        #  Get OpenSSL PEM string:
        print "OpenSSL PEM Public Key:" . "\r\n";
        print $pkey->getOpenSslPem() . "\r\n";

    }
    else {
        print "No public key found!" . "\n";
    }

}

#  The Chilkat Certificate, Certificate Store, Private Key,
#  Public Key, and Key Container classes / objects are freeware.

#  They are used by and included with the Chilkat Email,
#  Crypt, S/MIME, and other commercial Chilkat components.