Yet Another CPAN Grep

WebService-Sprint ( B/BW/BWARDEN/WebService-Sprint-0.50.tar.gz, BWARDEN, 2012; MetaCPAN )

WebService-Sprint/lib/WebService/Sprint.pm ( view source; MetaCPAN )

ON = '0.50';

use DateTime;
use Digest::MD5 qw(md5_hex);
use LWP::Simple;
use LWP::UserAgent;
use JSON;
use URI;

my %DEFAULTS = (
    base_url =>
      "http://sprintdevelopersandbox.com/developerSan

 location  => 'location.json',
    presence  => 'presence.json',
    perimeter => 'geofence/checkPerimeter.json',
    devices   => 'devices.json',
    device    => 'device.json',
);

=head1 DESCRIPTIO

rl( url => $url, );

    #warn "Response: $response\n";

    my $output = $self->decode_response( json => $response, );

    return $output;
}

=head2 build_url

Given a list of named arguments, const