1######################################################################
2package Net::Amazon::Response::MusicLabel;
3######################################################################
4use warnings;
5use strict;
6use base qw(Net::Amazon::Response);
7
8use Net::Amazon::Property;
9use Data::Dumper;
10
11##################################################
12sub new {
13##################################################
14    my($class, %options) = @_;
15
16    my $self = $class->SUPER::new(%options);
17
18    bless $self, $class;   # reconsecrate
19}
20
21##################################################
22sub as_string {
23##################################################
24    my($self) = @_;
25
26    return $self->SUPER::list_as_string($self->properties);
27}
28
291;
30