Skip to content

Instantly share code, notes, and snippets.

@flukeout

flukeout/gist:239047

Created November 19, 2009 21:05
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save flukeout/239047 to your computer and use it in GitHub Desktop.
Save flukeout/239047 to your computer and use it in GitHub Desktop.
Download ZIP
Zeep Mobile - Generating the authentication header - Perl
Raw
gistfile1.pl
my $canon = "$key$date$msg";
my $hmac = hmac_sha1($canon, $secret);
my $digest = encode_base64($hmac);
my $auth = "Zeep $key:$digest";
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment