The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

OAuth::Lite::SignatureMethod::PLAINTEXT - PLAINTEXT signature method class;

SYNOPSIS

# Consumer side
my $method = OAuth::Lite::SignatureMethod::PLAINTEXT->new(
    consumer_secret => 'foo',
    token_secret    => 'bar',
);

my $signature = $method->sign($base_string);

# Service Provider side
my $method = OAuth::Lite::SignatureMethod::PLAINTEXT->new(
    consumer_secret => 'foo',
    token_secret    => 'bar',
);
unless ($method->verify($base_string, $signature)) {
    say "Signature is invalid!";
}

DESCRIPTION

PLAINTEXT signature method class.

METHODS

method_name

Class method. Returns this method's name.

say OAuth::Lite::SignatureMethod::PLAINTEXT->method_name;
# PLAINTEXT

new(%params)

parameters

consumer_secret
token_secret
my $method = OAuth::Lite::SignatureMethod::PLAINTEXT->new(
    consumer_secret => $consumer_secret, 
    token_secret    => $bar,
);

sign($base_string)

Generate signature from base string.

my $signature = $method->sign($base_string);

verify($base_string, $signature)

Verify signature with base string.

my $signature_is_valid = $method->verify($base_string, $signature);
unless ($signature_is_valid) {
    say "Signature is invalid!";
}

AUTHOR

Lyo Kato, lyo.kato _at_ gmail.com

COPYRIGHT AND LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.6 or, at your option, any later version of Perl 5 you may have available.