1# -*- perl -*-
2# !!! DO NOT EDIT !!!
3# This file was automatically generated.
4package Net::Amazon::Validate::Type::ItemSearch;
5
6use 5.006;
7use strict;
8use warnings;
9
10use constant RESPONSEGROUP_VALID_VALUES => {
11    'Accessories' => 1,
12    'AlternateVersions' => 1,
13    'BrowseNodes' => 1,
14    'Collections' => 1,
15    'EditorialReview' => 1,
16    'Images' => 1,
17    'ItemAttributes' => 1,
18    'ItemIds' => 1,
19    'Large' => 1,
20    'ListmaniaLists' => 1,
21    'Medium' => 1,
22    'MerchantItemAttributes' => 1,
23    'OfferFull' => 1,
24    'OfferListings' => 1,
25    'OfferSummary' => 1,
26    'Offers' => 1,
27    'PromotionDetails' => 1,
28    'PromotionSummary' => 1,
29    'RelatedItems' => 1,
30    'Reviews' => 1,
31    'SalesRank' => 1,
32    'SearchBins' => 1,
33    'Similarities' => 1,
34    'Small' => 1,
35    'Subjects' => 1,
36    'TaggedGuides' => 1,
37    'TaggedItems' => 1,
38    'TaggedListmaniaLists' => 1,
39    'Tags' => 1,
40    'TagsSummary' => 1,
41    'Tracks' => 1,
42    'VariationMatrix' => 1,
43    'VariationMinimum' => 1,
44    'VariationOffers' => 1,
45    'VariationSummary' => 1,
46    'Variations' => 1,
47};
48
49sub new {
50    my ($class , %options) = @_;
51    my $self = {
52        %options,
53    };
54    bless $self, $class;
55}
56
57sub assert {
58    my ($self, $value, $name, $href) = @_;
59    die "Unknown type in Net::Amazon::Request constructor: $value" unless defined $href->{$value};
60}
61
62sub validate {
63    my ($self, $value, $name, $href) = @_;
64    if ( ref ($value) eq 'ARRAY' ) {
65        $self->assert($_, $name, $href) for (@$value);
66    } else {
67        $self->assert($value, $name, $href);
68    }
69}
70
71sub ResponseGroup {
72    my ($self, $value) = @_;
73    $self->validate($value, "ResponseGroup", (RESPONSEGROUP_VALID_VALUES));
74}
75
761;
77