File Coverage

blib/lib/WebService/Audioscrobbler/SimilarArtist.pm

Criterion	Covered	Total	%
statement	12	12	100.0
branch			n/a
condition			n/a
subroutine	4	4	100.0
pod			n/a
total	16	16	100.0

package WebService::Audioscrobbler::SimilarArtist;
use warnings;
use strict;
use CLASS;

use base 'WebService::Audioscrobbler::Artist';

=head1 NAME

WebService::Audioscrobbler::SimilarArtist - An object-oriented interface to the Audioscrobbler WebService API

=cut

our $VERSION = '0.07';

# object accessors
CLASS->mk_accessors(qw/match related_to/);

=head1 SYNOPSIS

This is a subclass of L which implements some
aditional fields that cover similarity aspects between two artists.

    use WebService::Audioscrobbler;

    my $artist = WebService::Audiocrobbler->artist('Foo');

    for my $similar ($artist->similar_artists) {
        print $similar->name . ": " . $similar->match . "\% similar\n";
    }

=head1 FIELDS

=head2 C

The related artist from which this C object has been constructed from.

=head2 C

The similarity index between this artist and the related artist. It's returned
as a number between 0 (not similar) and 100 (very similar).

=cut

=head1 AUTHOR

Nilson Santos Figueiredo Júnior, C<<  >>

=head1 COPYRIGHT & LICENSE

Copyright 2006-2007 Nilson Santos Figueiredo Júnior, all rights reserved.

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

=cut

1; # End of WebService::Audioscrobbler::SimilarArtist