Perl

Export a Public Key as XML

Demonstrates the Chilkat PublicKey.GetXml method, which returns the public key in Chilkat XML format. It takes no arguments; the exact representation (for example an RSAPublicKey element) depends on the key type.

Note: The file paths are relative to the application's current working directory. Absolute paths may also be used. Supply the paths appropriate to your own environment.

Background: The XML key format comes from the .NET/XML-DSIG world; exporting to it lets you hand a public key to .NET code or a system built around XML signatures. It is the inverse of LoadXml-style loading. Because a public key is not secret, this XML can be shared freely.

Chilkat Perl Downloads

Download Chilkat for Perl

Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

# Load a public key to export.  LoadFromFile inspects the content, so it accepts DER, PEM, XML,
# JWK, and other supported representations.
my $pubKey = Chilkat2::PublicKey->new;
my $success = $pubKey->LoadFromFile('qa_data/public.pem');
if (!$success) {
    print $pubKey->LastErrorText, "\n";
    exit;
}

# Export the public key in Chilkat XML format.  The representation depends on the key type (for
# example an RSAPublicKey element for RSA).
my $xml = $pubKey->GetXml();
if (!$pubKey->LastMethodSuccess) {
    print $pubKey->LastErrorText, "\n";
    exit;
}

print $xml, "\n";