Yet Another CPAN Grep

OAuth-Simple ( F/FO/FOXCOOL/OAuth-Simple-1.03.tar.gz, FOXCOOL, 2016; MetaCPAN )

OAuth-Simple/lib/OAuth/Simple.pm ( view source; MetaCPAN )


use 5.010;
use strict;
use warnings;

use HTTP::Request::Common;
require LWP::UserAgent;
require JSON;
require Carp;

our $VERSION = '1.03';


sub new {
    my $class = shift;
    my $self = bless {@

f->{secret} && $self->{postback});

    $self->{ua}   ||= LWP::UserAgent->new();
    $self->{json} ||= JSON->new;

    return $self;
}


sub authorize {
    my ($self, $params) = @_;

    my %params;

d_content unless $response->is_success;
    return $response->content if $raw;
    return $self->{json}->decode($response->content);
}

sub request_data {
    my ( $self, $params ) = @_;

    my %para