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

NAME

Net::Amazon::Property::Music - Class for pop CDs on amazon.com

SYNOPSIS

  use Net::Amazon;

  # ...

  if($resp->is_success()) {
      for my $prop ($resp->properties) {
          print join("/", $_->artists(), " ",
                $_->album(), " ",
                $_->label(), " ",
                $_->year(), " ";
                $_->upc(), " ";
                $_->media(), " ";
                $_->nummedia(), "\n";
  }

DESCRIPTION

Net::Amazon::Property::Music is derived from Net::Amazon::Property and on top of the all-purpose methods the base class provides, it offers specialized accessors for popular music CD parameters.

METHODS

artists()

Returns a list of the CD's artists. There's also a artist() method which just returns the first artist.

tracks()

Returns a list of the CD's track titles.

label()

Returns the music label as a string.

album()

Returns the CD's title as a string.

upc()

Returns the CD's UPC as a string.

media()

Returns the CD's media type as a string.

nummedia()

Returns the CD's number of media (number of discs) as a string. Amazon doesn't always send this back, so if you get undef assume it is 1.

new(xmlref => $xmlref)

Initializes an object by passing a hash of hashes structure containing the XML data returned from the service. Usually, this is just used by Net::Amazon internally to initialize objects for on backcoming data.

Check out Net::Amazon::Property for all-purpose accessors, like year, OurPrice, ListPrice, etc.

SEE ALSO

AUTHOR

Mike Schilli, <m@perlmeister.com>

THANKS

Thanks to Padraic Renaghan <padraic@renaghan.com<gt> for adding the upc/media/nummedia fields.

COPYRIGHT AND LICENSE

Copyright 2003 by Mike Schilli <m@perlmeister.com>

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.