(Perl) Hash (Digest) a String
Hash the bytes of a string.
use chilkat();
$sb = chilkat::CkStringBuilder->new();
$sb->Append("Hello World");
# Hashing algorithms (i.e. digest algorithms) operate on raw bytes.
# Therefore, we must specify the character encoding (utf-8, utf-16, iso-8859-1, etc.) to be used when hashing.
# Get the SHA256 hash in hex
$sha256_hex = $sb->getHash("sha256","hex","utf-8");
print "SHA256: " . $sha256_hex . "\r\n";
# Get the SHA384 hash in hex lowercase
$sha384_hex = $sb->getHash("sha384","hex_lower","utf-8");
print "SHA384: " . $sha384_hex . "\r\n";
# Get the SHA512 hash in base64
$sha512_base64 = $sb->getHash("sha512","base64","utf-8");
print "SHA512: " . $sha512_base64 . "\r\n";
# Get the SHA1 hash in hex lowercase
$sha1_hex = $sb->getHash("sha1","hex_lower","utf-8");
print "SHA1: " . $sha1_hex . "\r\n";
# Get the CRC8 digest in decimal
$crc8_decimal = $sb->getHash("crc8","decimal","utf-8");
print "CRC8: " . $crc8_decimal . "\r\n";
|