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