1# -*- perl -*-
2# !!! DO NOT EDIT !!!
3# This file was automatically generated.
4package Net::Amazon::Validate::ItemSearch::us::MinimumPrice;
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}}, 'Apparel';
18    push @{$self->{_options}}, 'Automotive';
19    push @{$self->{_options}}, 'Baby';
20    push @{$self->{_options}}, 'Beauty';
21    push @{$self->{_options}}, 'Books';
22    push @{$self->{_options}}, 'DigitalMusic';
23    push @{$self->{_options}}, 'Electronics';
24    push @{$self->{_options}}, 'GourmetFood';
25    push @{$self->{_options}}, 'HealthPersonalCare';
26    push @{$self->{_options}}, 'HomeGarden';
27    push @{$self->{_options}}, 'Jewelry';
28    push @{$self->{_options}}, 'Kitchen';
29    push @{$self->{_options}}, 'Magazines';
30    push @{$self->{_options}}, 'Miscellaneous';
31    push @{$self->{_options}}, 'MusicTracks';
32    push @{$self->{_options}}, 'MusicalInstruments';
33    push @{$self->{_options}}, 'OfficeProducts';
34    push @{$self->{_options}}, 'OutdoorLiving';
35    push @{$self->{_options}}, 'PCHardware';
36    push @{$self->{_options}}, 'PetSupplies';
37    push @{$self->{_options}}, 'Photo';
38    push @{$self->{_options}}, 'Software';
39    push @{$self->{_options}}, 'SportingGoods';
40    push @{$self->{_options}}, 'Tools';
41    push @{$self->{_options}}, 'Toys';
42    push @{$self->{_options}}, 'UnboxVideo';
43    push @{$self->{_options}}, 'VideoGames';
44    push @{$self->{_options}}, 'Wireless';
45    push @{$self->{_options}}, 'WirelessAccessories';
46
47    bless $self, $class;
48}
49
50sub user_or_default {
51    my ($self, $user) = @_;
52    if (defined $user && length($user) > 0) {
53        return $self->find_match($user);
54    }
55    return $self->default();
56}
57
58sub default {
59    my ($self) = @_;
60    return $self->{_default};
61}
62
63sub find_match {
64    my ($self, $value) = @_;
65    for (@{$self->{_options}}) {
66        return $_ if lc($_) eq lc($value);
67    }
68    die "$value is not a valid value for us::MinimumPrice!\n";
69}
70
711;
72
73__END__
74
75=head1 NAME
76
77Net::Amazon::Validate::ItemSearch::us::MinimumPrice - valid search indices for the us locale and the MinimumPrice operation.
78
79=head1 DESCRIPTION
80
81The default value is Books, unless mode is specified.
82
83The list of available values are:
84
85    Apparel
86    Automotive
87    Baby
88    Beauty
89    Books
90    DigitalMusic
91    Electronics
92    GourmetFood
93    HealthPersonalCare
94    HomeGarden
95    Jewelry
96    Kitchen
97    Magazines
98    Miscellaneous
99    MusicTracks
100    MusicalInstruments
101    OfficeProducts
102    OutdoorLiving
103    PCHardware
104    PetSupplies
105    Photo
106    Software
107    SportingGoods
108    Tools
109    Toys
110    UnboxVideo
111    VideoGames
112    Wireless
113    WirelessAccessories
114
115=cut
116