Authen-HTTP-Signature
view release on metacpan - search on metacpan
view release on metacpan or search on metacpan
lib/Authen/HTTP/Signature/Method/RSA.pm view on Meta::CPAN
Returns a base 64 encoded signature.
=back
=cut
sub sign {
my $self = shift;
my $key = Crypt::OpenSSL::RSA->new_private_key($self->key);
confess "I don't have a key!" unless $key;
$self->_set_digest($key);
my $s = $key->sign($self->data);
# pass empty string as second arg to prevent line breaks in stream
return encode_base64($s, "");
}
view all matches for this distributionview release on metacpan - search on metacpan
( run in 0.833 second using v1.00-cache-2.02-grep-82fe00e-cpan-dad7e4baca0 )