File Coverage

blib/lib/Locale/CLDR/Locales/Nl/Any/Be.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::Nl::Any::Be - Package for language Dutch
6              
7             =cut
8              
9             # This file auto generated from Data/common/main/nl_BE.xml
10             # on Mon 11 Apr 5:35:44 pm GMT
11              
12             use strict;
13 1     1   4614 use warnings;
  1         2  
  1         23  
14 1     1   4 use version;
  1         2  
  1         18  
15 1     1   3  
  1         2  
  1         4  
16             our $VERSION = version->declare('v0.34.1');
17              
18             use v5.10.1;
19 1     1   77 use mro 'c3';
  1         3  
20 1     1   9 use utf8;
  1         2  
  1         5  
21 1     1   42 use if $^V ge v5.12.0, feature => 'unicode_strings';
  1         2  
  1         4  
22 1     1   28 use Types::Standard qw( Str Int HashRef ArrayRef CodeRef RegexpRef );
  1         2  
  1         19  
23 1     1   93 use Moo;
  1         2  
  1         5  
24 1     1   831  
  1         2  
  1         6  
25             extends('Locale::CLDR::Locales::Nl::Any');
26             has 'display_name_region' => (
27             is => 'ro',
28             isa => HashRef[Str],
29             init_arg => undef,
30             default => sub {
31             {
32             '013' => 'Centraal-Amerika',
33              
34             }
35             },
36             );
37              
38             has 'number_currency_formats' => (
39             is => 'ro',
40             isa => HashRef,
41             init_arg => undef,
42             default => sub { {
43             'latn' => {
44             'pattern' => {
45             'default' => {
46             'standard' => {
47             'positive' => '¤ #,##0.00',
48             },
49             },
50             },
51             },
52             } },
53             );
54              
55             has 'day_period_data' => (
56             is => 'ro',
57             isa => CodeRef,
58             init_arg => undef,
59             default => sub { sub {
60             # Time in hhmm format
61             my ($self, $type, $time, $day_period_type) = @_;
62             $day_period_type //= 'default';
63             SWITCH:
64             for ($type) {
65             if ($_ eq 'generic') {
66             if($day_period_type eq 'default') {
67             return 'midnight' if $time == 0;
68             return 'afternoon1' if $time >= 1200
69             && $time < 1800;
70             return 'evening1' if $time >= 1800
71             && $time < 2400;
72             return 'morning1' if $time >= 600
73             && $time < 1200;
74             return 'night1' if $time >= 0
75             && $time < 600;
76             }
77             if($day_period_type eq 'selection') {
78             return 'afternoon1' if $time >= 1200
79             && $time < 1800;
80             return 'evening1' if $time >= 1800
81             && $time < 2400;
82             return 'morning1' if $time >= 600
83             && $time < 1200;
84             return 'night1' if $time >= 0
85             && $time < 600;
86             }
87             last SWITCH;
88             }
89             if ($_ eq 'gregorian') {
90             if($day_period_type eq 'default') {
91             return 'midnight' if $time == 0;
92             return 'afternoon1' if $time >= 1200
93             && $time < 1800;
94             return 'evening1' if $time >= 1800
95             && $time < 2400;
96             return 'morning1' if $time >= 600
97             && $time < 1200;
98             return 'night1' if $time >= 0
99             && $time < 600;
100             }
101             if($day_period_type eq 'selection') {
102             return 'afternoon1' if $time >= 1200
103             && $time < 1800;
104             return 'evening1' if $time >= 1800
105             && $time < 2400;
106             return 'morning1' if $time >= 600
107             && $time < 1200;
108             return 'night1' if $time >= 0
109             && $time < 600;
110             }
111             last SWITCH;
112             }
113             }
114             } },
115             );
116              
117             around day_period_data => sub {
118             my ($orig, $self) = @_;
119             return $self->$orig;
120             };
121              
122             has 'eras' => (
123             is => 'ro',
124             isa => HashRef,
125             init_arg => undef,
126             default => sub { {
127             'generic' => {
128             },
129             'gregorian' => {
130             },
131             } },
132             );
133              
134             has 'date_formats' => (
135             is => 'ro',
136             isa => HashRef,
137             init_arg => undef,
138             default => sub { {
139             'generic' => {
140             'short' => q{d/MM/yy GGGGG},
141             },
142             'gregorian' => {
143             'short' => q{d/MM/y},
144             },
145             } },
146             );
147              
148             has 'time_formats' => (
149             is => 'ro',
150             isa => HashRef,
151             init_arg => undef,
152             default => sub { {
153             'generic' => {
154             },
155             'gregorian' => {
156             },
157             } },
158             );
159              
160             has 'datetime_formats' => (
161             is => 'ro',
162             isa => HashRef,
163             init_arg => undef,
164             default => sub { {
165             'generic' => {
166             },
167             'gregorian' => {
168             },
169             } },
170             );
171              
172             has 'datetime_formats_available_formats' => (
173             is => 'ro',
174             isa => HashRef,
175             init_arg => undef,
176             default => sub { {
177             'generic' => {
178             MEd => q{E d/M},
179             Md => q{d/M},
180             yyyyM => q{M/y GGGGG},
181             yyyyMEd => q{E d/M/y GGGGG},
182             yyyyMd => q{d/M/y GGGGG},
183             },
184             'gregorian' => {
185             MEd => q{E d/M},
186             Md => q{d/M},
187             yM => q{M/y},
188             yMEd => q{E d/M/y},
189             yMd => q{d/M/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             MEd => {
209             M => q{E d/MM – E d/MM},
210             d => q{E d/MM – E d/MM},
211             },
212             Md => {
213             M => q{d/MM – d/MM},
214             d => q{d/MM – d/MM},
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 d/MM/y – E d/MM/y G},
222             d => q{E d/MM/y – E d/MM/y G},
223             y => q{E d/MM/y – E d/MM/y G},
224             },
225             yMd => {
226             M => q{d/MM/y – d/MM/y G},
227             d => q{d/MM/y – d/MM/y G},
228             y => q{d/MM/y – d/MM/y G},
229             },
230             },
231             'gregorian' => {
232             MEd => {
233             M => q{E d/MM – E d/MM},
234             d => q{E d/MM – E d/MM},
235             },
236             Md => {
237             M => q{d/MM – d/MM},
238             d => q{d/MM – d/MM},
239             },
240             yM => {
241             M => q{MM/y – MM/y},
242             y => q{MM/y – MM/y},
243             },
244             yMEd => {
245             M => q{E d/MM/y – E d/MM/y},
246             d => q{E d/MM/y – E d/MM/y},
247             y => q{E d/MM/y – E d/MM/y},
248             },
249             yMd => {
250             M => q{d/MM/y – d/MM/y},
251             d => q{d/MM/y – d/MM/y},
252             y => q{d/MM/y – d/MM/y},
253             },
254             },
255             } },
256             );
257              
258             no Moo;
259 1     1   977  
  1         1  
  1         4  
260             1;
261              
262             # vim: tabstop=4