1# -*- perl -*-
2# !!! DO NOT EDIT !!!
3# This file was automatically generated.
4package Net::Amazon::Validate::ItemSearch::uk::Sort;
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}}, 'HealthPersonalCare';
24    push @{$self->{_options}}, 'HomeGarden';
25    push @{$self->{_options}}, 'Kitchen';
26    push @{$self->{_options}}, 'Music';
27    push @{$self->{_options}}, 'MusicTracks';
28    push @{$self->{_options}}, 'OutdoorLiving';
29    push @{$self->{_options}}, 'Software';
30    push @{$self->{_options}}, 'SoftwareVideoGames';
31    push @{$self->{_options}}, 'Toys';
32    push @{$self->{_options}}, 'VHS';
33    push @{$self->{_options}}, 'Video';
34    push @{$self->{_options}}, 'VideoGames';
35    push @{$self->{_options}}, 'Watches';
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 uk::Sort!\n";
59}
60
611;
62
63__END__
64
65=head1 NAME
66
67Net::Amazon::Validate::ItemSearch::uk::Sort - valid search indices for the uk locale and the Sort operation.
68
69=head1 DESCRIPTION
70
71The default value is Books, unless mode is specified.
72
73The list of available values are:
74
75    Apparel
76    Baby
77    Books
78    Classical
79    DVD
80    Electronics
81    HealthPersonalCare
82    HomeGarden
83    Kitchen
84    Music
85    MusicTracks
86    OutdoorLiving
87    Software
88    SoftwareVideoGames
89    Toys
90    VHS
91    Video
92    VideoGames
93    Watches
94
95=cut
96