(Perl) Ed25519 Sign and Verify

Demonstrates how to create an Ed25519 signature, and then to verify it.

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.

$privKeyHex = "1498b5467a63dffa2dc9d9e069caf075d16fc33fdd4c3b01bfadae6433767d93";
$pubKeyHex = "b7a3c12dc0c8c748ab07525b701122b88bd78f600c76342d27f25e5f92444cde";

$privKey = chilkat::CkPrivateKey->new();
# This example shows only one way of loading an Ed25519 private key.
# Chilkat can load other formats (JWK, PEM, ASN.1 DER, etc.)  
# You may do so by calling LoadAnyFormat or LoadAnyFormatFile.
$success = $privKey->LoadEd25519($privKeyHex,$pubKeyHex);
if ($success == 0) {
    print $privKey->lastErrorText() . "\r\n";
    exit;
}

# The data to be signed...
$bd = chilkat::CkBinData->new();
$bd->AppendString("Message for Ed25519 signing","utf-8");

$eddsa = chilkat::CkEdDSA->new();
$hexSig = $eddsa->signBdENC($bd,"hexlower",$privKey);

print "signature = " . $hexSig . "\r\n";

# The expected output is: 6dd355667fae4eb43c6e0ab92e870edb2de0a88cae12dbd8591507f584fe4912babff497f1b8edf9567d2483d54ddc6459bea7855281b7a246a609e3001a4e08

# Verify the signature..
$pubKey = chilkat::CkPublicKey->new();
$success = $pubKey->LoadEd25519($pubKeyHex);
if ($success == 0) {
    print $pubKey->lastErrorText() . "\r\n";
    exit;
}

$bVerified = $eddsa->VerifyBdENC($bd,$hexSig,"hexlower",$pubKey);
if ($bVerified == 0) {
    print $eddsa->lastErrorText() . "\r\n";
    print "Failed to verify the signature." . "\r\n";
    exit;
}

print "The Ed25519 signature is verified!" . "\r\n";