1######################################################################
2package Net::Amazon::Request::Author;
3######################################################################
4use warnings;
5use strict;
6use base qw(Net::Amazon::Request);
7
8##################################################
9sub new {
10##################################################
11    my($class, %options) = @_;
12
13    $class->_assert_options_defined(\%options,
14                                   'author');
15
16    $class->_convert_option(\%options,
17                            'author',
18                            'Author');
19
20    my $self = $class->SUPER::new(%options);
21
22    $self->_convert_itemsearch();
23
24    bless $self, $class;   # reconsecrate
25}
26
271;
28
29__END__
30
31=head1 NAME
32
33Net::Amazon::Request::Author - Class for submitting Author requests
34
35=head1 SYNOPSIS
36
37  use Net::Amazon;
38  use Net::Amazon::Request::Author;
39
40  my $ua = Net::Amazon->new(
41      token       => 'YOUR_AMZN_TOKEN'
42  );
43
44  my $req = Net::Amazon::Request::Author->new(
45      author => 'James Patterson'
46  );
47
48  # Response is of type Net::Amazon::Response::Author
49  my $resp = $ua->request($req);
50
51=head1 DESCRIPTION
52
53C<Net::Amazon::Request::Author> is a class used to submit Author search
54requests to the Amazon web service.
55
56The author to search for is specified in the C<author> parameter.
57
58Upon success, the responses' C<properties()> method will return a list of
59C<Net::Amazon::Property::Book> objects.
60
61Check L<Net::Amazon::Request> for common request parameters not listed here.
62
63=head2 METHODS
64
65=over 4
66
67=item new( author => $author )
68
69Constructs a new C<Net::Amazon::Request::Author> object, used to query
70the Amazon web service for items of a given author.
71
72=back
73
74=head1 AUTHORS
75
76Christopher Boumenot, E<lt>boumenot@gmail.comE<gt>
77
78=head1 COPYRIGHT AND LICENSE
79
80Copyright 2006 by Christopher Boumenot, E<lt>boumenot@gmail.comE<gt>
81
82This library is free software; you can redistribute it and/or modify
83it under the same terms as Perl itself.
84
85=cut
86