summaryrefslogtreecommitdiff
path: root/lib/Net/Amazon/Request/BrowseNode.pm
diff options
context:
space:
mode:
authorAndreas Brachold <vdr07@deltab.de>2007-11-11 06:55:13 +0000
committerAndreas Brachold <vdr07@deltab.de>2007-11-11 06:55:13 +0000
commit3282be229999dc36c197b264d63063a18d136331 (patch)
tree98a42db29d955b39e7bed1b599fdcc56c3a29de9 /lib/Net/Amazon/Request/BrowseNode.pm
parentcfdd733c17cfa4f1a43b827a656e9e53cc2524ac (diff)
downloadxxv-3282be229999dc36c197b264d63063a18d136331.tar.gz
xxv-3282be229999dc36c197b264d63063a18d136331.tar.bz2
* Update installation list with required modules
* Remove unused/doubled provided external perl moduls
Diffstat (limited to 'lib/Net/Amazon/Request/BrowseNode.pm')
-rw-r--r--lib/Net/Amazon/Request/BrowseNode.pm137
1 files changed, 0 insertions, 137 deletions
diff --git a/lib/Net/Amazon/Request/BrowseNode.pm b/lib/Net/Amazon/Request/BrowseNode.pm
deleted file mode 100644
index 2f8d92f..0000000
--- a/lib/Net/Amazon/Request/BrowseNode.pm
+++ /dev/null
@@ -1,137 +0,0 @@
-######################################################################
-package Net::Amazon::Request::BrowseNode;
-######################################################################
-use warnings;
-use strict;
-use base qw(Net::Amazon::Request);
-
-##################################################
-sub new {
-##################################################
- my($class, %options) = @_;
-
- $class->_assert_options_defined(\%options,
- qw(browsenode mode));
-
- $class->_convert_option(\%options,
- 'browsenode',
- 'BrowseNodeSearch',
- \&_assert_node_is_numeric);
-
- my $self = $class->SUPER::new(%options);
-
- bless $self, $class; # reconsecrate
-}
-
-##
-## 'PRIVATE' FUNCTIONS
-##
-
-# _assert_node_is_numeric( OPTIONS, KEY )
-#
-# Takes a reference to a hash of OPTIONS and makes sure
-# that the browse node id keyed by KEY is numeric.
-#
-# Returns if all is well, dies otherwise.
-#
-sub _assert_node_is_numeric {
- my ($options, $key) = @_;
-
- die "Browse Node ID must be numeric."
- if ( $options->{$key} =~ /\D/ );
-}
-
-
-1;
-
-__END__
-
-=head1 NAME
-
-Net::Amazon::Request::BrowseNode - request class for browse node search
-
-=head1 SYNOPSIS
-
- use Net::Amazon;
- use Net::Amazon::Request::BrowseNode;
-
- my $ua = Net::Amazon->new(
- token => 'YOUR_AMZN_TOKEN'
- );
-
- my $req = Net::Amazon::Request::BrowseNode->new(
- browsenode => 30,
- mode => 'books'
- );
-
- # Response is of type Net::Amazon::Response::BrowseNode
- my $resp = $ua->request($req);
-
-=head1 DESCRIPTION
-
-C<Net::Amazon::Request::BrowseNode> is a class used to submit node search
-requests to the Amazon web service.
-
-The node to search for is specified in the C<browsenode> parameter. The
-browse node ID is a number that corresponds to a general subject area
-of Amazon.com.
-
-To find browse node IDs, the best way is to visit the "browse" area
-of the various product lines at Amazon.com. When you find a subject area
-that you would like to generate XML for, look at the web page URL. The
-browse ID should appear after the string "/tg/browse/-/". Here are some
-examples of URLs that contain browse IDs:
-
-=over 8
-
-http://www.amazon.com/exec/obidos/tg/browse/-/30
-(In this example, the browse ID = 30)
-
-http://www.amazon.com/exec/obidos/tg/browse/-/467970
-(In this example, the browse ID = 467970)
-
-http://www.amazon.com/exec/obidos/tg/browse/-/602314
-(In this example, the browse ID = 60231
-
-=back
-
-Please be aware that some nodes cannot be used with a
-BrowseNodeSearch. (The vast majority of them can, but you
-may run across a few that simply will not work). It is also
-important to point out that from time to time, some browse
-nodes are deprecated or are changed without notice.
-
-The catalog to search in is specified in the C<mode> parameter,
-typical values are C<books>, C<music>, C<classical> or C<electronics>.
-
-An optional C<keywords> parameter may be added to filter the results by that keyword.
-
-Upon success, the responses' C<properties()> method will return a list of
-C<Net::Amazon::Properties::*> objects.
-
-=head2 METHODS
-
-=over 4
-
-=item new( browsenode => $nodeID, mode => $mode [, keywords => $keywords] )
-
-Constructs a new C<Net::Amazon::Request::BrowseNode> object, used to query
-the Amazon web service for items in a particular category (node) in the
-mode (catalog) specified.
-
-=back
-
-Check L<Net::Amazon::Request> for common request parameters not listed here.
-
-=head1 AUTHOR
-
-Net::Amazon framework by Mike Schilli, E<lt>m@perlmeister.comE<gt>
-
-BrowseNode.pm by Jackie Hamilton, E<lt>kira@cgi101.comE<gt>
-
-=head1 LICENSE
-
-This library is free software; you can redistribute it and/or modify
-it under the same terms as Perl itself.
-
-=cut