(Perl) Load an Ed25519 Private Key from Hex

Demonstrates how to load an Ed25519 private key from raw hex bytes.

Note: This example requires Chilkat v9.5.0.83 or greater.

Chilkat Perl Downloads Perl Module for Windows, MacOS, Linux, Alpine Linux, Solaris

use chilkat();

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

$privKey = chilkat::CkPrivateKey->new();

# We have the hexidecimal encoded bytes of the private key and public key:
$privKeyHex = "d4ee72dbf913584ad5b6d8f1f769f8ad3afe7c28cbf1d4fbe097a88f44755842";
$pubKeyHex = "19bf44096984cdfe8541bac167dc3b96c85086aa30b6b6cb0c5c38ad703166e1";

# Load these values into the Chilkat private key object:
$success = $privKey->LoadEd25519($privKeyHex,$pubKeyHex);
if ($success == 0) {
    print $privKey->lastErrorText() . "\r\n";
    exit;
}

# ---------------------------------------------------------------
# We don't actually need the public key.  If we pass an empty string for the public key,
# Chilkat will automatically compute it.
$privKey2 = chilkat::CkPrivateKey->new();
$success = $privKey2->LoadEd25519($privKeyHex,"");

# Let's get the public key to see that it computed the same value.
$sbPubKeyHex = chilkat::CkStringBuilder->new();
$privKeyHex = $privKey2->getRawHex($sbPubKeyHex);
print "computed public key = " . $sbPubKeyHex->getAsString() . "\r\n";

# The output should be:
# computed public key = 19bf44096984cdfe8541bac167dc3b96c85086aa30b6b6cb0c5c38ad703166e1