package WebService::Instagram;
use 5.006;
use strict;
use warnings;
use JSON;
use LWP::UserAgent;
use URI;
use Carp;
use Data::Dumper;
use HTTP::Request;
use Safe::Isa;
our $VERSION = '0.09';
use
application/x-www-form-urlencoded');
$req->content($uri->query);
my $res = from_json($self->{browser}->request($req)->content);
# print Dumper $res;
# $self->{access_token} = $res->
e = $self->{browser}->get($uri->as_string);
my $ret = $response->decoded_content;
return decode_json $ret;
}
1; # End of WebService::Instagram
__END__
=head1 NAME
WebService::Instagram - Simple I