1# -*- perl -*- 2# !!! DO NOT EDIT !!! 3# This file was automatically generated. 4package Net::Amazon::Validate::ItemSearch::de::Kitchen; 5 6use 5.006; 7use strict; 8use warnings; 9 10sub new { 11 my ($class , %options) = @_; 12 my $self = { 13 '_default' => 'Title', 14 %options, 15 }; 16 17 push @{$self->{_options}}, 'Author'; 18 push @{$self->{_options}}, 'Availability'; 19 push @{$self->{_options}}, 'Brand'; 20 push @{$self->{_options}}, 'BrowseNode'; 21 push @{$self->{_options}}, 'Condition'; 22 push @{$self->{_options}}, 'Count'; 23 push @{$self->{_options}}, 'DeliveryMethod'; 24 push @{$self->{_options}}, 'Format'; 25 push @{$self->{_options}}, 'ISPUPostalCode'; 26 push @{$self->{_options}}, 'ItemPage'; 27 push @{$self->{_options}}, 'Keywords'; 28 push @{$self->{_options}}, 'Magazines'; 29 push @{$self->{_options}}, 'Manufacturer'; 30 push @{$self->{_options}}, 'MerchantId'; 31 push @{$self->{_options}}, 'Performer'; 32 push @{$self->{_options}}, 'PostalCode'; 33 push @{$self->{_options}}, 'Sort'; 34 push @{$self->{_options}}, 'State'; 35 push @{$self->{_options}}, 'Title'; 36 37 bless $self, $class; 38} 39 40sub user_or_default { 41 my ($self, $user) = @_; 42 if (defined $user && length($user) > 0) { 43 return $self->find_match($user); 44 } 45 return $self->default(); 46} 47 48sub default { 49 my ($self) = @_; 50 return $self->{_default}; 51} 52 53sub find_match { 54 my ($self, $value) = @_; 55 for (@{$self->{_options}}) { 56 return $_ if lc($_) eq lc($value); 57 } 58 die "$value is not a valid value for de::Kitchen!\n"; 59} 60 611; 62 63__END__ 64 65=head1 NAME 66 67Net::Amazon::Validate::ItemSearch::de::Kitchen - valid search indicies 68for the de locale and the Kitchen SearchIndex. 69 70=head1 DESCRIPTION 71 72The default value is Title, unless mode is specified. 73 74The list of available values are: 75 76 Author 77 Availability 78 Brand 79 BrowseNode 80 Condition 81 Count 82 DeliveryMethod 83 Format 84 ISPUPostalCode 85 ItemPage 86 Keywords 87 Magazines 88 Manufacturer 89 MerchantId 90 Performer 91 PostalCode 92 Sort 93 State 94 Title 95 96=cut 97