File Coverage

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