1# -*- perl -*-
2# !!! DO NOT EDIT !!!
3# This file was automatically generated.
4package Net::Amazon::Validate::ItemSearch::es::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}}, 'Artist';
19    push @{$self->{_options}}, 'AudienceRating';
20    push @{$self->{_options}}, 'Author';
21    push @{$self->{_options}}, 'Availability';
22    push @{$self->{_options}}, 'Books';
23    push @{$self->{_options}}, 'Brand';
24    push @{$self->{_options}}, 'BrowseNode';
25    push @{$self->{_options}}, 'DVD';
26    push @{$self->{_options}}, 'Director';
27    push @{$self->{_options}}, 'Electronics';
28    push @{$self->{_options}}, 'ForeignBooks';
29    push @{$self->{_options}}, 'Keywords';
30    push @{$self->{_options}}, 'KindleStore';
31    push @{$self->{_options}}, 'Kitchen';
32    push @{$self->{_options}}, 'Manufacturer';
33    push @{$self->{_options}}, 'MaximumPrice';
34    push @{$self->{_options}}, 'MerchantId';
35    push @{$self->{_options}}, 'MinimumPrice';
36    push @{$self->{_options}}, 'Music';
37    push @{$self->{_options}}, 'MusicLabel';
38    push @{$self->{_options}}, 'Power';
39    push @{$self->{_options}}, 'Publisher';
40    push @{$self->{_options}}, 'Software';
41    push @{$self->{_options}}, 'Sort';
42    push @{$self->{_options}}, 'Title';
43    push @{$self->{_options}}, 'Toys';
44    push @{$self->{_options}}, 'VideoGames';
45    push @{$self->{_options}}, 'Watches';
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 es::EAN!\n";
69}
70
711;
72
73__END__
74
75=head1 NAME
76
77Net::Amazon::Validate::ItemSearch::es::EAN - valid search indicies
78for the es locale and the EAN SearchIndex.
79
80=head1 DESCRIPTION
81
82The default value is Books, unless mode is specified.
83
84The list of available values are:
85
86    Actor
87    Artist
88    AudienceRating
89    Author
90    Availability
91    Books
92    Brand
93    BrowseNode
94    DVD
95    Director
96    Electronics
97    ForeignBooks
98    Keywords
99    KindleStore
100    Kitchen
101    Manufacturer
102    MaximumPrice
103    MerchantId
104    MinimumPrice
105    Music
106    MusicLabel
107    Power
108    Publisher
109    Software
110    Sort
111    Title
112    Toys
113    VideoGames
114    Watches
115
116=cut
117