Perl

Example: Crypt2.GenRandomBytesENC method

Shows how to use the GenRandomBytesENC method to generate a specified number of random bytes and return them as a binary encoded string, such as in base64 or hex format. Perl

use chilkat();

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

# Example of a some of the binary encodings supported by Chilkat.

# Internally uses the Fortuna cryptographically secure random number generation algorithm
# auto-seeded from a secure source of entropy that depends on the OS.

$crypt->put_EncodingMode("hex");
$s = $crypt->genRandomBytesENC(8);
print "Uppercase Hex: " . $s . "\r\n";

$crypt->put_EncodingMode("hex_lower");
$s = $crypt->genRandomBytesENC(8);
print "Lowercase Hex: " . $s . "\r\n";

$crypt->put_EncodingMode("base64");
$s = $crypt->genRandomBytesENC(8);
print "Base64: " . $s . "\r\n";

$crypt->put_EncodingMode("base64url");
$s = $crypt->genRandomBytesENC(8);
print "Base64Url: " . $s . "\r\n";

$crypt->put_EncodingMode("base58");
$s = $crypt->genRandomBytesENC(8);
print "Base58: " . $s . "\r\n";

$crypt->put_EncodingMode("base32");
$s = $crypt->genRandomBytesENC(8);
print "Base32: " . $s . "\r\n";

$crypt->put_EncodingMode("decList");
$s = $crypt->genRandomBytesENC(8);
print "Decimal List: " . $s . "\r\n";

# Sample Output:

# Uppercase Hex: 1BA0E87915C3B429
# Lowercase Hex: 1e1638a1c7996c58
# Base64: 1lV0I/su5lg=
# Base64Url: Zq7DU0nukLk
# Base58: foUVWUjAT6e
# Base32: LHV5RV4HRCLW2===
# Decimal List: 168,55,214,82,93,154,191,164