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