# -*- perl -*-
# !!! DO NOT EDIT !!!
# This file was automatically generated.
package Net::Amazon::Validate::ItemSearch::us::Keywords;
use 5.006;
use strict;
use warnings;
sub new {
my ($class , %options) = @_;
my $self = {
'_default' => 'Books',
%options,
};
push @{$self->{_options}}, 'Apparel';
push @{$self->{_options}}, 'Automotive';
push @{$self->{_options}}, 'Baby';
push @{$self->{_options}}, 'Beauty';
push @{$self->{_options}}, 'Blended';
push @{$self->{_options}}, 'Books';
push @{$self->{_options}}, 'Classical';
push @{$self->{_options}}, 'DVD';
push @{$self->{_options}}, 'DigitalMusic';
push @{$self->{_options}}, 'Electronics';
push @{$self->{_options}}, 'GourmetFood';
push @{$self->{_options}}, 'HealthPersonalCare';
push @{$self->{_options}}, 'HomeGarden';
push @{$self->{_options}}, 'Industrial';
push @{$self->{_options}}, 'Jewelry';
push @{$self->{_options}}, 'KindleStore';
push @{$self->{_options}}, 'Kitchen';
push @{$self->{_options}}, 'Magazines';
push @{$self->{_options}}, 'Merchants';
push @{$self->{_options}}, 'Miscellaneous';
push @{$self->{_options}}, 'Music';
push @{$self->{_options}}, 'MusicTracks';
push @{$self->{_options}}, 'MusicalInstruments';
push @{$self->{_options}}, 'OfficeProducts';
push @{$self->{_options}}, 'OutdoorLiving';
push @{$self->{_options}}, 'PCHardware';
push @{$self->{_options}}, 'PetSupplies';
push @{$self->{_options}}, 'Photo';
push @{$self->{_options}}, 'Shoes';
push @{$self->{_options}}, 'SilverMerchants';
push @{$self->{_options}}, 'Software';
push @{$self->{_options}}, 'SportingGoods';
push @{$self->{_options}}, 'Tools';
push @{$self->{_options}}, 'Toys';
push @{$self->{_options}}, 'UnboxVideo';
push @{$self->{_options}}, 'VHS';
push @{$self->{_options}}, 'Video';
push @{$self->{_options}}, 'VideoGames';
push @{$self->{_options}}, 'Watches';
push @{$self->{_options}}, 'Wireless';
push @{$self->{_options}}, 'WirelessAccessories';
bless $self, $class;
}
sub user_or_default {
my ($self, $user) = @_;
if (defined $user && length($user) > 0) {
return $self->find_match($user);
}
return $self->default();
}
sub default {
my ($self) = @_;
return $self->{_default};
}
sub find_match {
my ($self, $value) = @_;
for (@{$self->{_options}}) {
return $_ if lc($_) eq lc($value);
}
die "$value is not a valid value for us::Keywords!\n";
}
1;
__END__
=head1 NAME
Net::Amazon::Validate::ItemSearch::us::Keywords - valid search indicies
for the us locale and the Keywords SearchIndex.
=head1 DESCRIPTION
The default value is Books, unless mode is specified.
The list of available values are:
Apparel
Automotive
Baby
Beauty
Blended
Books
Classical
DVD
DigitalMusic
Electronics
GourmetFood
HealthPersonalCare
HomeGarden
Industrial
Jewelry
KindleStore
Kitchen
Magazines
Merchants
Miscellaneous
Music
MusicTracks
MusicalInstruments
OfficeProducts
OutdoorLiving
PCHardware
PetSupplies
Photo
Shoes
SilverMerchants
Software
SportingGoods
Tools
Toys
UnboxVideo
VHS
Video
VideoGames
Watches
Wireless
WirelessAccessories
=cut