Perl

Serialize a PFX to an Encoded String

Demonstrates Pfx.ToEncodedString, which serializes the current PFX contents and returns the PKCS#12 bytes encoded as text using a named encoding.

Background. Common encodings are base64 and hex. This is convenient when the PKCS#12 data must be stored or transmitted as printable text.

Chilkat Perl Downloads

Download Chilkat for Perl

Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

my $pfx = Chilkat2::Pfx->new;

# The file path is relative to the application's current working directory.  An absolute path
# may also be used.  Supply the path appropriate to your own environment.
# The PFX password should come from a secure source rather than being hard-coded.
my $password = 'myPfxPassword';
my $success = $pfx->LoadPfxFile('qa_data/identity.pfx', $password);
if (!$success) {
    print $pfx->LastErrorText, "\n";
    exit;
}

# Serialize the PFX contents using the given output password and return the PKCS#12 bytes encoded as
# text.  Common encodings include base64 and hex.
my $outputPassword = 'myOutputPassword';
my $encoded = $pfx->ToEncodedString($outputPassword, 'base64');
if (!$pfx->LastMethodSuccess) {
    print $pfx->LastErrorText, "\n";
    exit;
}

print $encoded, "\n";