WWW::Discogs::Label - get music label information and images

WWW-Discogs documentation Contained in the WWW-Discogs distribution.

Index

Code Index:

NAME

Top

WWW::Discogs::Label - get music label information and images

METHODS

Top

name

returns the name

releases

returns a list of releases

images

Returns a list of images

primary_images

Returns a list of the primary images

secondary_images

returns a list of the secondary images

contactinfo

returns a blurb of contact info

sublabels

returns a list of sublabel names

WWW-Discogs documentation Contained in the WWW-Discogs distribution. 
package WWW::Discogs::Label;

use strict;
use warnings;



sub new {
	my ($class, %opts) = @_;
	bless \%opts, $class;
}


sub name {
	my $self = shift;
	return $self->{name};
}


sub releases {
	my $self = shift;
	return @{ $self->{releases}{release} };
}


sub images {
	my $self = shift;
	return @{ $self->{images}{image} };
}


sub primary_images {
	my $self = shift;
	return grep {$_->{type} eq 'primary'} @{$self->{images}{image}};
}


sub secondary_images {
	my $self = shift;
	return grep {$_->{type} eq 'secondary'} @{$self->{images}{image}};
}


sub contactinfo {
	my $self = shift;
	return $self->{contactinfo};
}


sub sublabels {
	my $self = shift;
	return keys %{$self->{sublabels}};
}

1;