Yet Another CPAN Grep

Net-Dopplr ( S/SI/SIMONW/Net-Dopplr-0.7.tar.gz, SIMONW, 2008; MetaCPAN )

Net-Dopplr/lib/Net/Dopplr.pm ( view source; MetaCPAN )

package Net::Dopplr;

use strict;
use Carp;
use Net::Google::AuthSub;
use JSON::Any;
use URI;
use LWP::UserAgent;
use HTTP::Request::Common;

our $VERSION = '0.7';
our $AUTOLOAD;

=head1 NAME

Net::Do

new;
    my $json  = JSON::Any->new;
    my $auth  = Net::Google::AuthSub->new(url => $url);
    $auth->auth('null', $token);

    return bless { _auth => $auth, _ua => $ua, _json => $json, _url => $u

  die "Couldn't call $name : ".$res->status_line unless $res->is_success;

    return    $self->{_json}->decode($res->content);
}

sub DESTROY { }



=head1 AUTHOR

Simon Wistow <simon@thegestalt.org>