Perl

Example: Crypt2.AddPfxSourceFile method

Demonstrates how to call the AddPfxSourceFile method. Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

my $crypt = Chilkat2::Crypt2->new;
my $success = 0;

# Do public-key decryption (RSA)
$crypt->CryptAlgorithm('pki');

# ...
# ...
# ...

my $pfxPath = 'c:/my_pfx_files/a.pfx';
my $pfxPassword = 'secret1';
$success = $crypt->AddPfxSourceFile($pfxPath, $pfxPassword);
if (!$success) {
    print $crypt->LastErrorText, "\n";
    exit;
}

# Add as many as PFX sources as desired...
$pfxPath = 'c:/my_pfx_files/b.pfx';
$pfxPassword = 'secret2';
$success = $crypt->AddPfxSourceFile($pfxPath, $pfxPassword);
if (!$success) {
    print $crypt->LastErrorText, "\n";
    exit;
}

# ...
# ...