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

NAME

Net::CoverArtArchive - Query the coverartarchive.org

SYNOPSIS

    use Net::CoverArtArchive

    # Get a listing of all available artwork
    my $caa = Net::CoverArtArchive->new;
    my $all_artwork = $caa->find_available_artwork('4331ea73-77e1-3213-a840-5e4e74180f93');

    # Do things with single Net::CoverArtArchive::CoverArt objects
    my ($front) = grep { $_->is_front } @$all_artwork;
    printf "Checkout this cool artwork at %s!\n", $front->large_thumbnail;

METHODS

find_available_artwork

    find_available_artwork($musicbrainz_release_mbid)

Get's a list of Net::CoverArtArchive::CoverArt objects, where each object represents a piece of artwork for a given release.

Returns an array reference of Net::CoverArtArchive::CoverArt objects.

AUTHORS

  • Oliver Charles <oliver@musicbrainz.org>

  • Brian Cassidy <bricas@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2012 by Oliver Charles <oliver@musicbrainz.org>.

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