Perl

Set the JWS Payload from BinData

See more JSON Web Signatures (JWS) Examples

Demonstrates Jws.SetPayloadBd, which sets the payload to be signed from the binary bytes in a BinData.

Background. JWS (JSON Web Signature) integrity-protects a payload with a signature or MAC. The header alg names the algorithm; this example uses HMAC-SHA256 (HS256) with a symmetric MAC key.

Chilkat Perl Downloads

Download Chilkat for Perl

Perl

use chilkat();

$success = 0;

$jws = chilkat::CkJws->new();

#  Set the payload from the binary bytes in a BinData.
$bdPayload = chilkat::CkBinData->new();
$bdPayload->AppendString("Binary content to sign.","utf-8");

$success = $jws->SetPayloadBd($bdPayload);
if ($success == 0) {
    print $jws->lastErrorText() . "\r\n";
    exit;
}

print "Payload set." . "\r\n";