The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

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

VERSION

version 1.14

SYNOPSIS

    use Net::Douban;
    
    my $c = Net::Douban->new(
        consumer_key => 'CONSUMER_KEY',
        consumer_secret => 'CONSUMER_SECRET',
    );

    $c->get_request_token(callback_url = $callback_url);

    ## get you user to this url
    print $c->paste_url;
    <>;

    $c->get_access_token;

    #then you can use this object to access user data
    
    

METHODS

get_request_token

get_access_token

AUTHOR

woosley.xu, <woosley.xu at gmail.com>

LICENSE AND COPYRIGHT

Copyright 2010 - 2011 woosley.xu.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.