(Perl) Workaround for the deprecated Crypt2.OpaqueSignBytes method

Shows how to replace the deprecated OpaqueSignBytes method. (Chilkat is moving away from the use of CkByteData.)

Note: This example requires Chilkat v11.0.0 or greater.

Chilkat Perl Downloads Perl Module for Windows, MacOS, Linux, Alpine Linux

use chilkat();

$crypt = chilkat::CkCrypt2->new();

$cert = chilkat::CkCert->new();
# ...
# Load the cert from a source such as a .pfx/.p12 file, smart card, USB token, Apple keychain, Windows certificate store, etc.
# 
$success = $crypt->SetSigningCert($cert);

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

$path = "c:/someDir/example.dat";

# ------------------------------------------------------------------------
# The OpaqueSignBytes method is deprecated:

$inData = chilkat::CkByteData->new();
$inData->loadFile($path);

$outData = chilkat::CkByteData->new();

$success = $crypt->OpaqueSignBytes($inData,$outData);

# ------------------------------------------------------------------------
# Workaround.
# (Chilkat is moving away from using CkByteData)

$bd = chilkat::CkBinData->new();
$bd->LoadFile($path);

# If successful, the contents of bd are replaced with the PKCS#7 signed-data.
$success = $crypt->OpaqueSignBd($bd);