NAME

SYNOPSIS

        use IMDB::Persons;

        #
        # Retrieve a person information by IMDB code
        #
        my $person = new IMDB::Persons(crit => '0000129');

        or 

        #
        # Retrieve a person information by name
        #
        my $person = new IMDB::Persons(crit => 'Tom Cruise');

        or 

        #
        # Process already stored HTML page from IMDB
        #
        my $person = new IMDB::Persons(file => 'imdb.html');

        if($person->status) {
                print "Name: ".$person->name."\n";
                print "Birth Date: ".$person->date_of_birth."\n";
        } else {
                print "Something wrong: ".$person->error."!\n";
        }

DESCRIPTION

Object Private Methods

_init()

Initialize a new object.

_search_person()

Implements a logic to search IMDB persons by their names.

Object Public Methods

name()

Retrieve a person full name

        my $person_name = $person->name();
    

mini_bio()

Returns a mini bio for specified IMDB person

        my $mini_bio = $person->mini_bio();
    

date_of_birth()

Returns a date of birth of IMDB person in format 'day' 'month caption' 'year':

        my $d_birth = $person->date_of_birth();
    

place_of_birth()

Returns a name of place of the birth

        my $place = $person->place_of_birth();
    

photo()

Return a path to the person's photo

        my $photo = $person->photo();
    

filmography()

Returns a person's filmography as a hash of arrays with following structure:

        my $fg = $person->filmography();

        __DATA__
        $fg = {
                'Section' => [
                        {       title   => 'movie title', 
                                role    => 'person role', 
                                year    => 'year of movie production',
                                code    => 'IMDB code of movie',        
                        }
                ];
        }
    

The section can be In Development, Actor, Self, Thanks, Archive Footage, Producer etc.

genres()

Retrieve a list of movie genres for specified person:

        my $genres = $persons->genres;
    

plot_keywords()

Retrieve a list of keywords for movies where specified person plays:

        my $keywords = $persons->plot_keywords;
    

EXPORTS

Please, send me any found bugs by email: stepanov.michael@gmail.com.

SEE ALSO

AUTHOR

COPYRIGHT