Yet Another CPAN Grep

WebService-IMDBAPI ( A/AR/ARJONES/WebService-IMDBAPI-1.130030.tar.gz, ARJONES, 2013; MetaCPAN )

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

erAgent;
use JSON;

# default options
use constant DEFAULT_USER_AGENT => 'Mozilla/5.0';
use constant DEFAULT_LANG       => 'en-US';

use constant BASE_URL => 'http://imdbapi.org/?type=json';

use Obje

earch($options);
    if ( $response->is_success ) {

        my @results;
        for ( @{ decode_json( $response->content ) } ) {
            my $result = WebService::IMDBAPI::Result->new( %{$_} );

nse->is_success ) {

        my $result = WebService::IMDBAPI::Result->new(
            %{ decode_json( $response->content ) } );
        return $result;
    }
    else {
        die $response->status