Select Code to Download

package main

...
  sig.Write([]byte(byteData))
  return base64.StdEncoding.EncodeToString(sig.Sum(nil))
}

#!perl
use strict;
use Digest::SHA qw( hmac_sha256_base64 );
my $digest = hmac_sha256_base64("abcdef", pack "H*",'1234567890');
print $digest;

#!perl
use strict;
...

my $step6 = "Basic :".encode_base64($step4,'');
print "$step6\n";

// GO code
package main
...
  sig.Write([]byte(byteData))
  return base64.StdEncoding.EncodeToString(sig.Sum(nil))
}