Perl Examples

ChilkatHOMEASPVisual BasicVB.NETC#Visual C++CMFCDelphiFoxProJavaPerlPHPPythonRubySQL ServerVBScript

Perl Examples

Quick Start
Perl Unicode
Perl Byte Array
Perl Certs
Perl Email
Perl Encryption
Perl FTP
HTML-to-XML
Perl HTTP
Perl IMAP
Perl MHT
Perl MIME
Perl RSA
Perl S/MIME
Perl Signatures
Perl Socket
Perl Spider
Perl Tar
Perl Upload
Perl XML
Perl XMP
Perl Zip

More Examples...
String
Email Object
POP3
SMTP
RSS
Atom
Self-Extractor

Unreleased...
Service
PPMD
Deflate
Bzip2
LZW
Bz2
DH Key Exchange
DSA
Icon

 

 

 

 

 

 

 

EncryptEncoded: Decode-->Encrypt Bytes-->Encode

In some programming languages, it is very difficult to work with binary data. To help avoid these problems, two new methods have been added to the Chilkat Crypt2 component: EncryptEncoded and DecryptEncoded.

EncryptEncoded takes binary data in the form of an encoded string (base64, hex, etc.), decodes it, encrypts, and then encodes the encrypted output and returns an encoded string (base64, hex, etc.).

DecryptEncoded does the opposite. It accepts encrypted data in the form of an encoded string, decodes, decrypts, and then returns the result as an encoded string.

The encoding is determined by the EncodingMode property. It may be "base64", "hex", "url", "quoted-printable", etc.

Note: The EncryptEncoded and DecryptEncoded methods are unreleased at the time of this writing (08-April-2008) The next major Chilkat Crypt2 release after this date will include these new methods.

Chilkat Module for Perl 5.8.*

Chilkat Module for Perl 5.10.*

use chilkat;

$crypt = new chilkat::CkCrypt2();

$success = $crypt->UnlockComponent("Anything for 30-day trial");
if ($success != 1) {
    #  Unlock failed.
    print $crypt->lastErrorText() . "\n";
    exit;
}

$crypt->put_CryptAlgorithm("aes");
$crypt->put_KeyLength(128);

#  The encrypted output will be a hex-encoded string.
#  It is also possible to use "base64", "url" (for url-encoding), and other modes.
$crypt->put_EncodingMode("hex");

#  Both ECB and CBC modes are available.
#  Use "ecb" for Electronic Cookbook Mode.
#  "cbc" is for Cipher-Block-Chaining.
$crypt->put_CipherMode("ecb");

#  Key (128): E8E9EAEBEDEEEFF0F2F3F4F5F7F8F9FA
#  Plaintext: 014BAF2278A69D331D5180103643E99A
#  Ciphertext: 6743C3D1519AB4F2CD9A78AB09A511BD

$crypt->SetEncodedKey("E8E9EAEBEDEEEFF0F2F3F4F5F7F8F9FA","hex");

$crypt->put_PaddingScheme(3);

$cipherHex = $crypt->encryptEncoded("014BAF2278A69D331D5180103643E99A");
print $cipherHex . "\r\n";

$plainTextHex = $crypt->decryptEncoded($cipherHex);
print $plainTextHex . "\r\n";
 

Need a specific example? Send a request to support@chilkatsoft.com

© 2000-2007 Chilkat Software, Inc. All Rights Reserved.