File Coverage

blib/lib/Locale/CLDR/Locales/En/Any/Bz.pm
Criterion Covered Total %
statement 29 29 100.0
branch n/a
condition n/a
subroutine 10 10 100.0
pod n/a
total 39 39 100.0


line stmt bran cond sub pod time code
1             =encoding utf8
2              
3             =head1 NAME
4              
5             Locale::CLDR::Locales::En::Any::Bz - Package for language English
6              
7             =cut
8              
9             package Locale::CLDR::Locales::En::Any::Bz;
10             # This file auto generated from Data\common\main\en_BZ.xml
11             # on Fri 13 Oct 9:13:14 am GMT
12              
13 1     1   1509 use strict;
  1         2  
  1         29  
14 1     1   4 use warnings;
  1         2  
  1         29  
15 1     1   5 use version;
  1         1  
  1         8  
16              
17             our $VERSION = version->declare('v0.34.2');
18              
19 1     1   97 use v5.10.1;
  1         3  
20 1     1   15 use mro 'c3';
  1         2  
  1         9  
21 1     1   35 use utf8;
  1         2  
  1         8  
22 1     1   30 use if $^V ge v5.12.0, feature => 'unicode_strings';
  1         2  
  1         17  
23 1     1   129 use Types::Standard qw( Str Int HashRef ArrayRef CodeRef RegexpRef );
  1         2  
  1         10  
24 1     1   1014 use Moo;
  1         2  
  1         7  
25              
26             extends('Locale::CLDR::Locales::En::Any::001');
27             has 'units' => (
28             is => 'ro',
29             isa => HashRef[HashRef[HashRef[Str]]],
30             init_arg => undef,
31             default => sub { {
32             'narrow' => {
33             'celsius' => {
34             'one' => q({0}°C),
35             'other' => q({0}°C),
36             },
37             'fahrenheit' => {
38             'one' => q({0}°),
39             'other' => q({0}°),
40             },
41             },
42             } }
43             );
44              
45             has 'currencies' => (
46             is => 'ro',
47             isa => HashRef,
48             init_arg => undef,
49             default => sub { {
50             'BZD' => {
51             symbol => '$',
52             },
53             } },
54             );
55              
56              
57             has 'day_period_data' => (
58             is => 'ro',
59             isa => CodeRef,
60             init_arg => undef,
61             default => sub { sub {
62             # Time in hhmm format
63             my ($self, $type, $time, $day_period_type) = @_;
64             $day_period_type //= 'default';
65             SWITCH:
66             for ($type) {
67             if ($_ eq 'generic') {
68             if($day_period_type eq 'default') {
69             return 'midnight' if $time == 0;
70             return 'noon' if $time == 1200;
71             return 'afternoon1' if $time >= 1200
72             && $time < 1800;
73             return 'evening1' if $time >= 1800
74             && $time < 2100;
75             return 'morning1' if $time >= 600
76             && $time < 1200;
77             return 'night1' if $time >= 2100;
78             return 'night1' if $time < 600;
79             }
80             if($day_period_type eq 'selection') {
81             return 'afternoon1' if $time >= 1200
82             && $time < 1800;
83             return 'evening1' if $time >= 1800
84             && $time < 2100;
85             return 'morning1' if $time >= 600
86             && $time < 1200;
87             return 'night1' if $time >= 2100;
88             return 'night1' if $time < 600;
89             }
90             last SWITCH;
91             }
92             if ($_ eq 'gregorian') {
93             if($day_period_type eq 'default') {
94             return 'midnight' if $time == 0;
95             return 'noon' if $time == 1200;
96             return 'afternoon1' if $time >= 1200
97             && $time < 1800;
98             return 'evening1' if $time >= 1800
99             && $time < 2100;
100             return 'morning1' if $time >= 600
101             && $time < 1200;
102             return 'night1' if $time >= 2100;
103             return 'night1' if $time < 600;
104             }
105             if($day_period_type eq 'selection') {
106             return 'afternoon1' if $time >= 1200
107             && $time < 1800;
108             return 'evening1' if $time >= 1800
109             && $time < 2100;
110             return 'morning1' if $time >= 600
111             && $time < 1200;
112             return 'night1' if $time >= 2100;
113             return 'night1' if $time < 600;
114             }
115             last SWITCH;
116             }
117             }
118             } },
119             );
120              
121             around day_period_data => sub {
122             my ($orig, $self) = @_;
123             return $self->$orig;
124             };
125              
126             has 'eras' => (
127             is => 'ro',
128             isa => HashRef,
129             init_arg => undef,
130             default => sub { {
131             'generic' => {
132             },
133             'gregorian' => {
134             },
135             } },
136             );
137              
138             has 'date_formats' => (
139             is => 'ro',
140             isa => HashRef,
141             init_arg => undef,
142             default => sub { {
143             'generic' => {
144             'full' => q{EEEE, dd MMMM y G},
145             'long' => q{dd MMMM y G},
146             'medium' => q{dd-MMM-y G},
147             },
148             'gregorian' => {
149             'full' => q{EEEE, dd MMMM y},
150             'long' => q{dd MMMM y},
151             'medium' => q{dd-MMM-y},
152             'short' => q{dd/MM/yy},
153             },
154             } },
155             );
156              
157             has 'time_formats' => (
158             is => 'ro',
159             isa => HashRef,
160             init_arg => undef,
161             default => sub { {
162             'generic' => {
163             },
164             'gregorian' => {
165             'full' => q{HH:mm:ss zzzz},
166             'long' => q{HH:mm:ss z},
167             'medium' => q{HH:mm:ss},
168             'short' => q{HH:mm},
169             },
170             } },
171             );
172              
173             has 'datetime_formats' => (
174             is => 'ro',
175             isa => HashRef,
176             init_arg => undef,
177             default => sub { {
178             'generic' => {
179             },
180             'gregorian' => {
181             },
182             } },
183             );
184              
185             has 'datetime_formats_available_formats' => (
186             is => 'ro',
187             isa => HashRef,
188             init_arg => undef,
189             default => sub { {
190             'generic' => {
191             MMMEd => q{E, dd MMM},
192             MMMd => q{dd MMM},
193             yyyyM => q{MM/y G},
194             yyyyMEd => q{E, dd/MM/y G},
195             yyyyMMMEd => q{E, dd MMM y G},
196             yyyyMMMd => q{dd MMM y G},
197             yyyyMd => q{dd/MM/y G},
198             },
199             'gregorian' => {
200             MMMEd => q{E, dd MMM},
201             MMMd => q{dd MMM},
202             yMMMEd => q{E, dd MMM y},
203             yMMMd => q{dd MMM y},
204             },
205             } },
206             );
207              
208             has 'datetime_formats_append_item' => (
209             is => 'ro',
210             isa => HashRef,
211             init_arg => undef,
212             default => sub { {
213             } },
214             );
215              
216             has 'datetime_formats_interval' => (
217             is => 'ro',
218             isa => HashRef,
219             init_arg => undef,
220             default => sub { {
221             'generic' => {
222             MEd => {
223             M => q{E, M/d – E, M/d},
224             d => q{E, M/d – E, M/d},
225             },
226             MMMEd => {
227             M => q{E, MMM d – E, MMM d},
228             d => q{E, MMM d – E, MMM d},
229             },
230             MMMd => {
231             M => q{MMM d – MMM d},
232             d => q{MMM d – d},
233             },
234             Md => {
235             M => q{M/d – M/d},
236             d => q{M/d – M/d},
237             },
238             yM => {
239             M => q{M/y – M/y G},
240             y => q{M/y – M/y G},
241             },
242             yMEd => {
243             M => q{E, M/d/y – E, M/d/y G},
244             d => q{E, M/d/y – E, M/d/y G},
245             y => q{E, M/d/y – E, M/d/y G},
246             },
247             yMMMEd => {
248             M => q{E, MMM d – E, MMM d, y G},
249             d => q{E, MMM d – E, MMM d, y G},
250             y => q{E, MMM d, y – E, MMM d, y G},
251             },
252             yMMMd => {
253             M => q{MMM d – MMM d, y G},
254             d => q{MMM d – d, y G},
255             y => q{MMM d, y – MMM d, y G},
256             },
257             yMd => {
258             M => q{M/d/y – M/d/y G},
259             d => q{M/d/y – M/d/y G},
260             y => q{M/d/y – M/d/y G},
261             },
262             },
263             'gregorian' => {
264             MEd => {
265             M => q{E, M/d – E, M/d},
266             d => q{E, M/d – E, M/d},
267             },
268             MMMEd => {
269             M => q{E, MMM d – E, MMM d},
270             d => q{E, MMM d – E, MMM d},
271             },
272             MMMd => {
273             M => q{MMM d – MMM d},
274             d => q{MMM d – d},
275             },
276             Md => {
277             M => q{M/d – M/d},
278             d => q{M/d – M/d},
279             },
280             yM => {
281             M => q{M/y – M/y},
282             y => q{M/y – M/y},
283             },
284             yMEd => {
285             M => q{E, M/d/y – E, M/d/y},
286             d => q{E, M/d/y – E, M/d/y},
287             y => q{E, M/d/y – E, M/d/y},
288             },
289             yMMMEd => {
290             M => q{E, MMM d – E, MMM d, y},
291             d => q{E, MMM d – E, MMM d, y},
292             y => q{E, MMM d, y – E, MMM d, y},
293             },
294             yMMMd => {
295             M => q{MMM d – MMM d, y},
296             d => q{MMM d – d, y},
297             y => q{MMM d, y – MMM d, y},
298             },
299             yMd => {
300             M => q{M/d/y – M/d/y},
301             d => q{M/d/y – M/d/y},
302             y => q{M/d/y – M/d/y},
303             },
304             },
305             } },
306             );
307              
308 1     1   1233 no Moo;
  1         2  
  1         5  
309              
310             1;
311              
312             # vim: tabstop=4