1# -*- perl -*- 2# !!! DO NOT EDIT !!! 3# This file was automatically generated. 4package Net::Amazon::Validate::ItemSearch::us::EAN; 5 6use 5.006; 7use strict; 8use warnings; 9 10sub new { 11 my ($class , %options) = @_; 12 my $self = { 13 '_default' => 'Books', 14 %options, 15 }; 16 17 push @{$self->{_options}}, 'Actor'; 18 push @{$self->{_options}}, 'Apparel'; 19 push @{$self->{_options}}, 'Artist'; 20 push @{$self->{_options}}, 'AudienceRating'; 21 push @{$self->{_options}}, 'Author'; 22 push @{$self->{_options}}, 'Availability'; 23 push @{$self->{_options}}, 'Baby'; 24 push @{$self->{_options}}, 'Beauty'; 25 push @{$self->{_options}}, 'Blended'; 26 push @{$self->{_options}}, 'Books'; 27 push @{$self->{_options}}, 'Brand'; 28 push @{$self->{_options}}, 'BrowseNode'; 29 push @{$self->{_options}}, 'Classical'; 30 push @{$self->{_options}}, 'Composer'; 31 push @{$self->{_options}}, 'Condition'; 32 push @{$self->{_options}}, 'Conductor'; 33 push @{$self->{_options}}, 'Count'; 34 push @{$self->{_options}}, 'DVD'; 35 push @{$self->{_options}}, 'DeliveryMethod'; 36 push @{$self->{_options}}, 'Director'; 37 push @{$self->{_options}}, 'Electronics'; 38 push @{$self->{_options}}, 'Format'; 39 push @{$self->{_options}}, 'HealthPersonalCare'; 40 push @{$self->{_options}}, 'HomeGarden'; 41 push @{$self->{_options}}, 'ISPUPostalCode'; 42 push @{$self->{_options}}, 'ItemPage'; 43 push @{$self->{_options}}, 'Jewelry'; 44 push @{$self->{_options}}, 'Keywords'; 45 push @{$self->{_options}}, 'Kitchen'; 46 push @{$self->{_options}}, 'MP3Downloads'; 47 push @{$self->{_options}}, 'Magazines'; 48 push @{$self->{_options}}, 'Manufacturer'; 49 push @{$self->{_options}}, 'MaximumPrice'; 50 push @{$self->{_options}}, 'MerchantId'; 51 push @{$self->{_options}}, 'MinimumPrice'; 52 push @{$self->{_options}}, 'Music'; 53 push @{$self->{_options}}, 'MusicLabel'; 54 push @{$self->{_options}}, 'MusicTracks'; 55 push @{$self->{_options}}, 'OfficeProducts'; 56 push @{$self->{_options}}, 'Orchestra'; 57 push @{$self->{_options}}, 'OutdoorLiving'; 58 push @{$self->{_options}}, 'Performer'; 59 push @{$self->{_options}}, 'PostalCode'; 60 push @{$self->{_options}}, 'Power'; 61 push @{$self->{_options}}, 'Publisher'; 62 push @{$self->{_options}}, 'ResponseGroup'; 63 push @{$self->{_options}}, 'ReviewSort'; 64 push @{$self->{_options}}, 'SearchIndex'; 65 push @{$self->{_options}}, 'Shoes'; 66 push @{$self->{_options}}, 'Software'; 67 push @{$self->{_options}}, 'SoftwareVideoGames'; 68 push @{$self->{_options}}, 'Sort'; 69 push @{$self->{_options}}, 'State'; 70 push @{$self->{_options}}, 'TagPage'; 71 push @{$self->{_options}}, 'TagSort'; 72 push @{$self->{_options}}, 'TagsPerPage'; 73 push @{$self->{_options}}, 'TextStream'; 74 push @{$self->{_options}}, 'Title'; 75 push @{$self->{_options}}, 'Toys'; 76 push @{$self->{_options}}, 'VHS'; 77 push @{$self->{_options}}, 'Video'; 78 push @{$self->{_options}}, 'VideoGames'; 79 push @{$self->{_options}}, 'Watches'; 80 81 bless $self, $class; 82} 83 84sub user_or_default { 85 my ($self, $user) = @_; 86 if (defined $user && length($user) > 0) { 87 return $self->find_match($user); 88 } 89 return $self->default(); 90} 91 92sub default { 93 my ($self) = @_; 94 return $self->{_default}; 95} 96 97sub find_match { 98 my ($self, $value) = @_; 99 for (@{$self->{_options}}) { 100 return $_ if lc($_) eq lc($value); 101 } 102 die "$value is not a valid value for us::EAN!\n"; 103} 104 1051; 106 107__END__ 108 109=head1 NAME 110 111Net::Amazon::Validate::ItemSearch::us::EAN - valid search indicies 112for the us locale and the EAN SearchIndex. 113 114=head1 DESCRIPTION 115 116The default value is Books, unless mode is specified. 117 118The list of available values are: 119 120 Actor 121 Apparel 122 Artist 123 AudienceRating 124 Author 125 Availability 126 Baby 127 Beauty 128 Blended 129 Books 130 Brand 131 BrowseNode 132 Classical 133 Composer 134 Condition 135 Conductor 136 Count 137 DVD 138 DeliveryMethod 139 Director 140 Electronics 141 Format 142 HealthPersonalCare 143 HomeGarden 144 ISPUPostalCode 145 ItemPage 146 Jewelry 147 Keywords 148 Kitchen 149 MP3Downloads 150 Magazines 151 Manufacturer 152 MaximumPrice 153 MerchantId 154 MinimumPrice 155 Music 156 MusicLabel 157 MusicTracks 158 OfficeProducts 159 Orchestra 160 OutdoorLiving 161 Performer 162 PostalCode 163 Power 164 Publisher 165 ResponseGroup 166 ReviewSort 167 SearchIndex 168 Shoes 169 Software 170 SoftwareVideoGames 171 Sort 172 State 173 TagPage 174 TagSort 175 TagsPerPage 176 TextStream 177 Title 178 Toys 179 VHS 180 Video 181 VideoGames 182 Watches 183 184=cut 185