NAME

WWW::Moviepilot::Person - Handle moviepilot.de people

SYNOPSIS

    my $person = WWW::Moviepilot->new->(...)->person( 'paul-newman' );

    # all fields
    my @fields = $person->fields;

    # direct access to fields
    print $person->date_of_death; # "2008-09-26"
    print $person->title;         # field does not exist => undef

METHODS

new

Creates a blank WWW::Moviepilot::Person object.

    my $person = WWW::Moviepilot::Person->new;

populate( $args )

Populates an object with data, you should not use this directly.

character

If used together with a movie search, you get the name of the character the person plays in the movie.

    my @cast = $movie->cast;
    foreach my $person (@cast) {
        printf "%s plays %s\n", $person->last_name, $person->character;
    }

name

Returns the internal moviepilot name for the person.

    my @people = WWW::Moviepilot->new(...)->search_person( 'paul-newman' );
    foreach my $person (@people) {
        print $person->name;
    }

filmography

Returns the filmography for the person.

    my $person = WWW::Moviepilot->new(...)->person(...);
    my @filmography = $person->cast;

Returned is a list of WWW::Moviepilot::Person objects.

fields

Returns a list with all fields for this person.

    my @fields = $person->fields;

    # print all fields
    foreach my $field (@fields) {
        printf "%s: %s\n", $field. $person->$field;
    }

As of 2009-10-14, these fields are supported:

• date_of_birth

• date_of_death

• first_name

• homepage

• last_name

• long_description

• pseudonyms

• restful_url

• sex

• short_description

AUTHOR

Frank Wiegand, <frank.wiegand at gmail.com>

SEE ALSO

WWW::Moviepilot, WWW::Moviepilot::Movie.

COPYRIGHT & LICENSE

Copyright 2009 Frank Wiegand.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.

cpanm WWW::Moviepilot

perl -MCPAN -e shell
install WWW::Moviepilot