SYNOPSIS
use Crypt::OpenSSL::PKCS12;
my $pass = "your password";
my $pkcs12 = Crypt::OpenSSL::PKCS12->new_from_file('cert.p12');
print $pkcs12->certificate($pass);
print $pkcs12->private_key($pass);
if ($pkcs12->mac_ok($pass)) {
....
$pkcs12->create('test-cert.pem', 'test-key.pem', $pass, 'out.p12', "friendly name");
ABSTRACT
Crypt::OpenSSL::PKCS12 - Perl extension to OpenSSL's PKCS12 API.
DESCRIPTION
This implements a small bit of OpenSSL's PKCS12 API.
FUNCTIONS
- new( )
- new_from_string( $string )
-
new_from_file( $filename )
Create a new Crypt::OpenSSL::PKCS12 instance.
-
certificate( [$pass] )
Get the Base64 representation of the certificate.
-
private_key( [$pass] )
Get the Base64 representation of the private key.
-
as_string( [$pass] )
Get the binary represenation as a string.
-
mac_ok( [$pass] )
Verifiy the certificates Message Authentication Code
-
changepass( $old, $new )
Change a certificate's password.
-
create( $cert, $key, $pass, $output_file, $friendly_name )
Create a new PKCS12 certificate. $cert & $key may either be strings or filenames.
$friendly_name is optional.
EXPORT
None by default.On request:
- NOKEYS
- NOCERTS
- INFO
- CLCERTS
- CACERTS
AUTHOR
Dan Sully, <[email protected]>COPYRIGHT AND LICENSE
Copyright 2004-2014 by Dan SullyThis library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.