The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Net::iTMS::Search - Represents a simple search of the iTunes Music Store

SYNOPSIS

    use Net::iTMS::Search;

    my $search = Net::iTMS::Search->new($iTMS, $query);
    
    for my $album ($search->albums) {
        print $album->title, " by ", $album->artist->name, "\n";
    }

DESCRIPTION

Net::iTMS::Search represents a search of the iTMS and encapsulates the associated data. PLEASE NOTE: This simple search is currently broken due to unresolvable changes in the iTMS. Please use Net::iTMS::Search::Advanced, which works.

Methods

new($itms, $query)

The first argument must be an instance of Net::iTMS, the second a query string.

Returns a blessed hashref (object) for Net::iTMS::Search.

query

Returns the query string the search is for.

songs

Returns an array or arrayref (depending on context) of Net::iTMS::Song objects for the songs found.

albums

Returns an array or arrayref (depending on context) of Net::iTMS::Album objects for the albums found.

NB: Due to an apparent limitation of the simple search in the iTMS, the maximum number of albums returned will be four.

LICENSE

Copyright 2004, Thomas R. Sibley.

You may use, modify, and distribute this package under the same terms as Perl itself.

AUTHOR

Thomas R. Sibley, http://zulutango.org:82/

SEE ALSO

Net::iTMS, Net::iTMS::Song, Net::iTMS::Artist