JGNI / Locale-CLDR-v0.0.4-TRIAL / lib / Locale / CLDR / En / Any / Jm.pm 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185

              
package Locale::CLDR::En::Any::Jm v0.0.4;
# This file auto generated from Data\common\main\en_JM.xml
#       on Sun 13 Apr 10:09:29 am GMT
# XML file generated 2013-08-27 13:07:13 -0500 (Tue, 27 Aug 2013)
use v5.18;
use mro 'c3';
use utf8;
use Moose;
extends('Locale::CLDR::En::Any');
has 'curriencies' => (
        is                      => 'ro',
        isa                     => 'HashRef',
        init_arg        => undef,
        default         => sub { {
                'JMD' => {
                        symbol => '$',
                },
        } },
);
has 'day_period_data' => (
        traits          => ['Code'],
        is                      => 'ro',
        isa                     => 'CodeRef',
        init_arg        => undef,
        handles         => { call => 'execute_method' },
        default         => sub { sub {
                # Time in hhmm format
                my ($self, $type, $time) = @_;
                SWITCH:
                for ($type) {
                        if ($_ eq 'generic') {
                                return 'noon' if $time == 1200;
                                return 'am' if $time >= 000
                                        && $time < 1200;
                                return 'pm' if $time > 1200
                                        && $time < 2400;
                        last SWITCH;
                        }
                        if ($_ eq 'gregorian') {
                                return 'noon' if $time == 1200;
                                return 'am' if $time >= 000
                                        && $time < 1200;
                                return 'pm' if $time > 1200
                                        && $time < 2400;
                        last SWITCH;
                        }
                }
        } },
);
has 'eras' => (
        is                      => 'ro',
        isa                     => 'HashRef',
        init_arg        => undef,
        default         => sub { {
                'generic' => {
                },
                'gregorian' => {
                },
        } },
);
has 'date_formats' => (
        is                      => 'ro',
        isa                     => 'HashRef',
        init_arg        => undef,
        default         => sub { {
                'generic' => {
                        'short' => q{d/M/y GGGGG},
                },
                'gregorian' => {
                        'short' => q{d/M/yy},
                },
        } },
);
has 'time_formats' => (
        is                      => 'ro',
        isa                     => 'HashRef',
        init_arg        => undef,
        default         => sub { {
                'generic' => {
                },
                'gregorian' => {
                },
        } },
);
has 'datetime_formats' => (
        is                      => 'ro',
        isa                     => 'HashRef',
        init_arg        => undef,
        default         => sub { {
                'generic' => {
                },
                'gregorian' => {
                },
        } },
);
has 'datetime_formats_available_formats' => (
        is                      => 'ro',
        isa                     => 'HashRef',
        init_arg        => undef,
        default         => sub { {
                'gregorian' => {
                        MEd => q{E, d/M},
                        Md => q{d/M},
                        yMEd => q{E, d/M/y},
                },
                'generic' => {
                        MEd => q{E, d/M},
                        Md => q{d/M},
                        yyyyMEd => q{E, d/M/y G},
                },
        } },
);
has 'datetime_formats_append_item' => (
        is                      => 'ro',
        isa                     => 'HashRef',
        init_arg        => undef,
        default         => sub { {
        } },
);
has 'datetime_formats_interval' => (
        is                      => 'ro',
        isa                     => 'HashRef',
        init_arg        => undef,
        default         => sub { {
                'gregorian' => {
                        MEd => {
                                M => q{E, d/M - E, d/M},
                                d => q{E, d/M - E, d/M},
                        },
                        Md => {
                                M => q{d/M - d/M},
                                d => q{d/M - d/M},
                        },
                        yMEd => {
                                M => q{E, d/M/y - E, d/M/y},
                                d => q{E, d/M/y - E, d/M/y},
                                y => q{E, d/M/y - E, d/M/y},
                        },
                        yMd => {
                                M => q{d/M/y - d/M/y},
                                d => q{d/M/y - d/M/y},
                                y => q{d/M/y - d/M/y},
                        },
                },
                'generic' => {
                        MEd => {
                                M => q{E, d/M - E, d/M},
                                d => q{E, d/M - E, d/M},
                        },
                        Md => {
                                M => q{d/M - d/M},
                                d => q{d/M - d/M},
                        },
                        yMEd => {
                                M => q{E, d/M/y - E, d/M/y G},
                                d => q{E, d/M/y - E, d/M/y G},
                                y => q{E, d/M/y - E, d/M/y G},
                        },
                        yMd => {
                                M => q{d/M/y - d/M/y G},
                                d => q{d/M/y - d/M/y G},
                                y => q{d/M/y - d/M/y G},
                        },
                },
        } },
);
no Moose;
__PACKAGE__->meta->make_immutable;
1;
# vim: tabstop=4