Yet Another CPAN Grep

WebService-OMDB ( A/AR/ARJONES/WebService-OMDB-1.140440.tar.gz, ARJONES, 2014; MetaCPAN )

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

ERSION = '1.140440';
}

# ABSTRACT: Interface to http://www.omdbapi.com/

use LWP::UserAgent;
use JSON;

use constant BASE_URL => 'http://www.omdbapi.com/';

sub search {
    my ( $s, $options ) = @_;

nse = _get( 's', $s, $options );
    if ( $response->is_success ) {

        my $content = decode_json( $response->content );
        return $content->{Search};
    }
    else {
        die $response-

nse = _get( 'i', $i, $options );
    if ( $response->is_success ) {

        my $content = decode_json( $response->content );
        return $content;
    }
    else {
        die $response->status_li