Yet Another CPAN Grep

WWW-TheMovieDB ( P/PJ/PJOBSON/WWW-TheMovieDB-0.05.tar.gz, PJOBSON, 2013; MetaCPAN )

WWW-TheMovieDB/lib/WWW/TheMovieDB.pm ( view source; MetaCPAN )

000;
use strict;
use warnings;
use HTTP::Request;
use LWP::UserAgent;
use URI::Escape;
use JSON qw(encode_json);

our $VERSION = '0.05';
our $EMPTY = q{};
our $SL = q{/};
our $AM = q{&};
our $EQ = q{=

>{'version'}          || '3';
	$package->{'type'}             = $params->{'type'}             || 'json';
	$package->{'uri'}              = $params->{'uri'}              || 'http://api.themoviedb.org';

y $params = shift;

	my $url = $params->{'url'};
	my $method = $params->{'method'};
	my $json = $params->{'json'} || $EMPTY;

	my $ua = LWP::UserAgent->new;
	   $ua->agent("WWW::TheMovieDB/". $VERSION