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/