RSA OAEP Padding

Demonstrates how to use OAEP padding with the RSA encryption algorithm. More information about OAEP Padding.

Chilkat Module for Perl 5.8.*

Chilkat Module for Perl 5.10.*

use chilkat;

$rsa = new chilkat::CkRsa();

$success = $rsa->UnlockComponent("Anything for 30-day trial");
if ($success != 1) {
    print "RSA component unlock failed" . "\n";
    exit;
}

#  RSA public key in XML format:
$publicKey = "<RSAKeyValue><Modulus>of3im3mRgd2NLXIGoK6uYLg6jj0Ug2b42rnqa5Tbwz2ieFqMJqt+++x2oqLYGurlz49nt+7/785g3XYWqoka4u9c9zul6YubIjnBM72dQy7rEkEfbUxgjcxqXyjZFx+FpaxFUecLu688XEu+9UA42VKiCgcl+E7TrqnfeeYpNXc=</Modulus><Exponent>AQAB</Exponent></RSAKeyValue>";

$rsa->ImportPublicKey($publicKey);

#  To use Optimal Asymmetric Encryption Padding (OAEP) padding,
#  simply set the OaepPadding property:
$rsa->put_OaepPadding(1);

#  Encrypt a string and return the encrypted data base64-encoded:
$rsa->put_EncodingMode("base64");

$plainText = "RSA Encryption should be easy.";

$usePrivateKey = 0;
$encryptedStr = $rsa->encryptStringENC($plainText,$usePrivateKey);
print $encryptedStr . "\r\n";