NAME
WebService::Livedoor::Auth - [One line description of module's purpose here]
SYNOPSIS
use WebService::Livedoor::Auth;
my $auth = WebService::Livedoor::Auth->new({
app_key => '...',
secret => '...',
});
my $uri = $auth->uri_to_login({userdata => '...'});
use CGI;
use WebService::Livedoor::Auth;
my $q = CGI->new;
my $auth = WebService::Livedoor::Auth->new({
app_key => '...',
secret => '...',
});
my $user = $auth->validate_response($q);
if($user) {
my $livedoor_id = $auth->get_livedoor_id($user);
}
DESCRIPTION
AUTHOR
Tomohiro IKEBE <ikebe@shebang.jp>
LICENCE AND COPYRIGHT
Copyright (c) 2006, Tomohiro IKEBE <ikebe@shebang.jp>
. All rights reserved.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See perlartistic.