Perl

HMAC MD5 to Match RFC 2022 Test Vectors

See more Encryption Examples

Demonstrates using Chilkat in _LANGUAGE_ to computer HMAC MD5 message authentication codes to match the test vectors given by RFC 2202. Perl

use chilkat();

# This example assumes the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

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

# The output will be Hex, so set the EncodingMode:
$crypt->put_EncodingMode("hex");

# Set the hash algorithm:
# Choices are: md5, sha-1, sha256, sha384, sha512, md2, haval
$crypt->put_HashAlgorithm("md5");
$crypt->put_MacAlgorithm("hmac");

# Set the HMAC key:
$crypt->SetMacKeyEncoded("0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b","hex");
$mac = $crypt->macStringENC("Hi There");
print $mac . "\r\n";

$crypt->SetMacKeyEncoded("Jefe","ansi");
$mac = $crypt->macStringENC("what do ya want for nothing?");
print $mac . "\r\n";