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

    Net::Douban::OAuth - OAuth object for Net::Douban

VERSION

version 1.07_1

SYNOPSIS

    my $oauth = Net::Douban::OAuth->new(
        consumer_key => ,
        consumer_secret => ,
    );

    $oauth->callback_url($url);
    $oauth->request_token;
    print $oauth->authorize_url; # paste this url to your user
    $oauth->access_token; # now this object is authorized 
    $agent = Net::Douban->new(oauth => $oauth);

DESCRIPTION

OAuth object for douban.com base on Net::OAuth

METHOD

new

Create the OAuth object for authentication. If the authenticated tokens are passed as the arguments, do remember to pass authorized => 1 too.

request_token

get request token into $oauth->consumer

access_token

get access_token into $oauth->consumer

HTTP Request Methods
    get
    post
    put
    delete

SEE ALSO

Net::Douban Moose Net::OAuth http://douban.com/service/apidoc/auth

AUTHOR

woosley.xu<redicaps@gmail.com>

COPYRIGHT & LICENSE

This software is copyright (c) 2010 by woosley.xu.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.