/ 
LWP-UserAgent-iTMS_Client-0.01_01
/ LWP::UserAgent::iTMS_Client

NAME

LWP::UserAgent::iTMS_Client - libwww-perl client for Apple iTunes music store

SYNOPSIS

use LWP::UserAgent::iTMS_Client;

# search the Store

my $ua = LWP::UserAgent::iTMS_Client->new;
my $listings = $ua->search( song => 'apples' );
foreach my $album (@{$listings}) { print $album->{songName} }

# get my authorization keys

my $ua = new LWP::UserAgent::iTMS_Client(
    account_type => 'apple',
    user_id => 'name@email.org',
    password => 'password',
    DEBUG => 1,
    DEBUG_ID_FILE => "debug_id.txt",
    ds_id => 71111111,
);
$ua->retrieve_keys_from_iTMS;

DESCRIPTION

This perl module implements a user agent which can interact with the Apple iTunes Music Store (iTMS). In the long run, we envision a Perl extension that will allow automated browsing and purchasing of music. For example, the module might be used to automatically get samples of new albums by a particular artist, or buy everything on a Top Ten list weekly.

LWP::UserAgent::iTMS_Client is a sub-class of LWP::UserAgent and implements the methods of UserAgent, but does so using Apple's officially undocumented protocols. Because these protocols change with revisions to iTunes, the modules may occasionally lag Apple's changes until this module, too, is updated.

The initial versions of this user agent will concentrate on browsing the listings and obtaining the user's keys.

METHODS (to be finished later)

new
request
retrieve_keys_from_iTMS
deauthorize_gu_id

BUGS

This is a development version, so no doubt there are lots of bugs. For starters, the searches only work with 'song' and 'all' at the moment. Making LWP look on the internet like a recent copy of iTunes is a bit of a moving target. Please don't use up your 5 iTunes machines with this module, fail to save youe guID strings, have to call iTMS to wipe your authorizations and start over, and then blame us. That is what the deauthorize_gu_id routine is for.

SEE ALSO ON CPAN

Audio::M4P, Audio::M4P::Atom, Audio::M4PDecrypt, Mac::iTunes, Net::iTMS

AUTHOR

William Herrera wherrera@skylightview.com.

SUPPORT

Questions, feature requests and bug reports should go to <wherrera@skylightview.com>.

COPYRIGHT

    Copyright (c) 2003-2005 William Herrera. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

4 POD Errors

The following errors were encountered while parsing the POD:

Around line 554:

'=item' outside of any '=over'

Around line 564:

You forgot a '=back' before '=head1'

Around line 576:

'=item' outside of any '=over'

Around line 578:

You forgot a '=back' before '=head1'