File Coverage

blib/lib/Locale/CLDR/EraBoundries.pm
Criterion Covered Total %
statement 32 32 100.0
branch n/a
condition n/a
subroutine 11 11 100.0
pod 0 1 0.0
total 43 44 97.7


line stmt bran cond sub pod time code
1             # This file auto generated from Data.xml
2             # on Mon 11 Apr 5:22:54 pm GMT
3              
4             use strict;
5 21     21   11053 use warnings;
  21         42  
  21         536  
6 21     21   85 use version;
  21         35  
  21         460  
7 21     21   80  
  21         33  
  21         118  
8             our $VERSION = version->declare('v0.34.1');
9              
10             use v5.10.1;
11 21     21   1724 use mro 'c3';
  21         58  
12 21     21   87 use utf8;
  21         33  
  21         125  
13 21     21   447 use if $^V ge v5.12.0, feature => 'unicode_strings';
  21         31  
  21         114  
14 21     21   595 use Types::Standard qw( Str Int HashRef ArrayRef CodeRef RegexpRef );
  21         45  
  21         276  
15 21     21   2384 use Moo::Role;
  21         41  
  21         156  
16 21     21   18024  
  21         34  
  21         137  
17              
18             my ($self, $type, $date) = @_;
19             my $era = $self->_era_boundry;
20 2     2 0 665 return $era->($self, $type, $date);
21 2         6 }
22 2         6  
23             has '_era_boundry' => (
24             is => 'ro',
25             isa => CodeRef,
26             init_arg => undef,
27             default => sub { sub {
28             my ($self, $type, $date) = @_;
29             # $date in yyyymmdd format
30             my $return = -1;
31             SWITCH:
32             for ($type) {
33             if ($_ eq 'gregorian') {
34             $return = 0 if $date <= 1231;
35             $return = 1 if $date >= 10101;
36             last SWITCH
37             }
38             if ($_ eq 'generic') {
39             last SWITCH
40             }
41             if ($_ eq 'japanese') {
42             $return = 0 if $date >= 6450619;
43             $return = 1 if $date >= 6500215;
44             $return = 2 if $date >= 6720101;
45             $return = 3 if $date >= 6860720;
46             $return = 4 if $date >= 7010321;
47             $return = 5 if $date >= 7040510;
48             $return = 6 if $date >= 7080111;
49             $return = 7 if $date >= 7150902;
50             $return = 8 if $date >= 7171117;
51             $return = 9 if $date >= 7240204;
52             $return = 10 if $date >= 7290805;
53             $return = 11 if $date >= 7490414;
54             $return = 12 if $date >= 7490702;
55             $return = 13 if $date >= 7570818;
56             $return = 14 if $date >= 7650107;
57             $return = 15 if $date >= 7670816;
58             $return = 16 if $date >= 7701001;
59             $return = 17 if $date >= 7810101;
60             $return = 18 if $date >= 7820819;
61             $return = 19 if $date >= 8060518;
62             $return = 20 if $date >= 8100919;
63             $return = 21 if $date >= 8240105;
64             $return = 22 if $date >= 8340103;
65             $return = 23 if $date >= 8480613;
66             $return = 24 if $date >= 8510428;
67             $return = 25 if $date >= 8541130;
68             $return = 26 if $date >= 8570221;
69             $return = 27 if $date >= 8590415;
70             $return = 28 if $date >= 8770416;
71             $return = 29 if $date >= 8850221;
72             $return = 30 if $date >= 8890427;
73             $return = 31 if $date >= 8980426;
74             $return = 32 if $date >= 9010715;
75             $return = 33 if $date >= 9230411;
76             $return = 34 if $date >= 9310426;
77             $return = 35 if $date >= 9380522;
78             $return = 36 if $date >= 9470422;
79             $return = 37 if $date >= 9571027;
80             $return = 38 if $date >= 9610216;
81             $return = 39 if $date >= 9640710;
82             $return = 40 if $date >= 9680813;
83             $return = 41 if $date >= 9700325;
84             $return = 42 if $date >= 9731220;
85             $return = 43 if $date >= 9760713;
86             $return = 44 if $date >= 9781129;
87             $return = 45 if $date >= 9830415;
88             $return = 46 if $date >= 9850427;
89             $return = 47 if $date >= 9870405;
90             $return = 48 if $date >= 9890808;
91             $return = 49 if $date >= 9901107;
92             $return = 50 if $date >= 9950222;
93             $return = 51 if $date >= 9990113;
94             $return = 52 if $date >= 10040720;
95             $return = 53 if $date >= 10121225;
96             $return = 54 if $date >= 10170423;
97             $return = 55 if $date >= 10210202;
98             $return = 56 if $date >= 10240713;
99             $return = 57 if $date >= 10280725;
100             $return = 58 if $date >= 10370421;
101             $return = 59 if $date >= 10401110;
102             $return = 60 if $date >= 10441124;
103             $return = 61 if $date >= 10460414;
104             $return = 62 if $date >= 10530111;
105             $return = 63 if $date >= 10580829;
106             $return = 64 if $date >= 10650802;
107             $return = 65 if $date >= 10690413;
108             $return = 66 if $date >= 10740823;
109             $return = 67 if $date >= 10771117;
110             $return = 68 if $date >= 10810210;
111             $return = 69 if $date >= 10840207;
112             $return = 70 if $date >= 10870407;
113             $return = 71 if $date >= 10941215;
114             $return = 72 if $date >= 10961217;
115             $return = 73 if $date >= 10971121;
116             $return = 74 if $date >= 10990828;
117             $return = 75 if $date >= 11040210;
118             $return = 76 if $date >= 11060409;
119             $return = 77 if $date >= 11080803;
120             $return = 78 if $date >= 11100713;
121             $return = 79 if $date >= 11130713;
122             $return = 80 if $date >= 11180403;
123             $return = 81 if $date >= 11200410;
124             $return = 82 if $date >= 11240403;
125             $return = 83 if $date >= 11260122;
126             $return = 84 if $date >= 11310129;
127             $return = 85 if $date >= 11320811;
128             $return = 86 if $date >= 11350427;
129             $return = 87 if $date >= 11410710;
130             $return = 88 if $date >= 11420428;
131             $return = 89 if $date >= 11440223;
132             $return = 90 if $date >= 11450722;
133             $return = 91 if $date >= 11510126;
134             $return = 92 if $date >= 11541028;
135             $return = 93 if $date >= 11560427;
136             $return = 94 if $date >= 11590420;
137             $return = 95 if $date >= 11600110;
138             $return = 96 if $date >= 11610904;
139             $return = 97 if $date >= 11630329;
140             $return = 98 if $date >= 11650605;
141             $return = 99 if $date >= 11660827;
142             $return = 100 if $date >= 11690408;
143             $return = 101 if $date >= 11710421;
144             $return = 102 if $date >= 11750728;
145             $return = 103 if $date >= 11770804;
146             $return = 104 if $date >= 11810714;
147             $return = 105 if $date >= 11820527;
148             $return = 106 if $date >= 11840416;
149             $return = 107 if $date >= 11850814;
150             $return = 108 if $date >= 11900411;
151             $return = 109 if $date >= 11990427;
152             $return = 110 if $date >= 12010213;
153             $return = 111 if $date >= 12040220;
154             $return = 112 if $date >= 12060427;
155             $return = 113 if $date >= 12071025;
156             $return = 114 if $date >= 12110309;
157             $return = 115 if $date >= 12131206;
158             $return = 116 if $date >= 12190412;
159             $return = 117 if $date >= 12220413;
160             $return = 118 if $date >= 12241120;
161             $return = 119 if $date >= 12250420;
162             $return = 120 if $date >= 12271210;
163             $return = 121 if $date >= 12290305;
164             $return = 122 if $date >= 12320402;
165             $return = 123 if $date >= 12330415;
166             $return = 124 if $date >= 12341105;
167             $return = 125 if $date >= 12350919;
168             $return = 126 if $date >= 12381123;
169             $return = 127 if $date >= 12390207;
170             $return = 128 if $date >= 12400716;
171             $return = 129 if $date >= 12430226;
172             $return = 130 if $date >= 12470228;
173             $return = 131 if $date >= 12490318;
174             $return = 132 if $date >= 12561005;
175             $return = 133 if $date >= 12570314;
176             $return = 134 if $date >= 12590326;
177             $return = 135 if $date >= 12600413;
178             $return = 136 if $date >= 12610220;
179             $return = 137 if $date >= 12640228;
180             $return = 138 if $date >= 12750425;
181             $return = 139 if $date >= 12780229;
182             $return = 140 if $date >= 12880428;
183             $return = 141 if $date >= 12930805;
184             $return = 142 if $date >= 12990425;
185             $return = 143 if $date >= 13021121;
186             $return = 144 if $date >= 13030805;
187             $return = 145 if $date >= 13061214;
188             $return = 146 if $date >= 13081009;
189             $return = 147 if $date >= 13110428;
190             $return = 148 if $date >= 13120320;
191             $return = 149 if $date >= 13170203;
192             $return = 150 if $date >= 13190428;
193             $return = 151 if $date >= 13210223;
194             $return = 152 if $date >= 13241209;
195             $return = 153 if $date >= 13260426;
196             $return = 154 if $date >= 13290829;
197             $return = 155 if $date >= 13310809;
198             $return = 156 if $date >= 13340129;
199             $return = 157 if $date >= 13360229;
200             $return = 158 if $date >= 13400428;
201             $return = 159 if $date >= 13461208;
202             $return = 160 if $date >= 13700724;
203             $return = 161 if $date >= 13720401;
204             $return = 162 if $date >= 13750527;
205             $return = 163 if $date >= 13790322;
206             $return = 164 if $date >= 13810210;
207             $return = 165 if $date >= 13840428;
208             $return = 166 if $date >= 13870822;
209             $return = 167 if $date >= 13870823;
210             $return = 168 if $date >= 13890209;
211             $return = 169 if $date >= 13900326;
212             $return = 170 if $date >= 13940705;
213             $return = 171 if $date >= 14280427;
214             $return = 172 if $date >= 14290905;
215             $return = 173 if $date >= 14410217;
216             $return = 174 if $date >= 14440205;
217             $return = 175 if $date >= 14490728;
218             $return = 176 if $date >= 14520725;
219             $return = 177 if $date >= 14550725;
220             $return = 178 if $date >= 14570928;
221             $return = 179 if $date >= 14601221;
222             $return = 180 if $date >= 14660228;
223             $return = 181 if $date >= 14670303;
224             $return = 182 if $date >= 14690428;
225             $return = 183 if $date >= 14870729;
226             $return = 184 if $date >= 14890821;
227             $return = 185 if $date >= 14920719;
228             $return = 186 if $date >= 15010229;
229             $return = 187 if $date >= 15040230;
230             $return = 188 if $date >= 15210823;
231             $return = 189 if $date >= 15280820;
232             $return = 190 if $date >= 15320729;
233             $return = 191 if $date >= 15551023;
234             $return = 192 if $date >= 15580228;
235             $return = 193 if $date >= 15700423;
236             $return = 194 if $date >= 15730728;
237             $return = 195 if $date >= 15921208;
238             $return = 196 if $date >= 15961027;
239             $return = 197 if $date >= 16150713;
240             $return = 198 if $date >= 16240230;
241             $return = 199 if $date >= 16441216;
242             $return = 200 if $date >= 16480215;
243             $return = 201 if $date >= 16520918;
244             $return = 202 if $date >= 16550413;
245             $return = 203 if $date >= 16580723;
246             $return = 204 if $date >= 16610425;
247             $return = 205 if $date >= 16730921;
248             $return = 206 if $date >= 16810929;
249             $return = 207 if $date >= 16840221;
250             $return = 208 if $date >= 16880930;
251             $return = 209 if $date >= 17040313;
252             $return = 210 if $date >= 17110425;
253             $return = 211 if $date >= 17160622;
254             $return = 212 if $date >= 17360428;
255             $return = 213 if $date >= 17410227;
256             $return = 214 if $date >= 17440221;
257             $return = 215 if $date >= 17480712;
258             $return = 216 if $date >= 17511027;
259             $return = 217 if $date >= 17640602;
260             $return = 218 if $date >= 17721116;
261             $return = 219 if $date >= 17810402;
262             $return = 220 if $date >= 17890125;
263             $return = 221 if $date >= 18010205;
264             $return = 222 if $date >= 18040211;
265             $return = 223 if $date >= 18180422;
266             $return = 224 if $date >= 18301210;
267             $return = 225 if $date >= 18441202;
268             $return = 226 if $date >= 18480228;
269             $return = 227 if $date >= 18541127;
270             $return = 228 if $date >= 18600318;
271             $return = 229 if $date >= 18610219;
272             $return = 230 if $date >= 18640220;
273             $return = 231 if $date >= 18650407;
274             $return = 232 if $date >= 18680908;
275             $return = 233 if $date >= 19120730;
276             $return = 234 if $date >= 19261225;
277             $return = 235 if $date >= 19890108;
278             $return = 236 if $date >= 20190501;
279             last SWITCH
280             }
281             if ($_ eq 'islamic') {
282             $return = 0 if $date >= 6220715;
283             last SWITCH
284             }
285             if ($_ eq 'islamic-civil') {
286             $return = 0 if $date >= 6220716;
287             last SWITCH
288             }
289             if ($_ eq 'islamic-rgsa') {
290             $return = 0 if $date >= 6220715;
291             last SWITCH
292             }
293             if ($_ eq 'islamic-tbla') {
294             $return = 0 if $date >= 6220715;
295             last SWITCH
296             }
297             if ($_ eq 'islamic-umalqura') {
298             $return = 0 if $date >= 6220715;
299             last SWITCH
300             }
301             if ($_ eq 'chinese') {
302             $return = 0 if $date >= 263601;
303             last SWITCH
304             }
305             if ($_ eq 'hebrew') {
306             $return = 0 if $date >= 376010;
307             last SWITCH
308             }
309             if ($_ eq 'buddhist') {
310             $return = 0 if $date >= 54201;
311             last SWITCH
312             }
313             if ($_ eq 'coptic') {
314             $return = 0 if $date <= 2840828;
315             $return = 1 if $date >= 2840829;
316             last SWITCH
317             }
318             if ($_ eq 'persian') {
319             $return = 0 if $date >= 6220101;
320             last SWITCH
321             }
322             if ($_ eq 'dangi') {
323             $return = 0 if $date >= 233201;
324             last SWITCH
325             }
326             if ($_ eq 'ethiopic') {
327             $return = 0 if $date <= 80828;
328             $return = 1 if $date >= 80829;
329             last SWITCH
330             }
331             if ($_ eq 'ethiopic-amete-alem') {
332             $return = 0 if $date <= 549208;
333             last SWITCH
334             }
335             if ($_ eq 'indian') {
336             $return = 0 if $date >= 790101;
337             last SWITCH
338             }
339             if ($_ eq 'roc') {
340             $return = 0 if $date <= 19111231;
341             $return = 1 if $date >= 19120101;
342             last SWITCH
343             }
344             } return $return; }
345             }
346             );
347              
348             no Moo::Role;
349              
350 21     21   31561 1;
  21         40  
  21         89  
351              
352             # vim: tabstop=4