File Coverage

blib/lib/Locale/CLDR/Locales/Sr/Cyrl/Xk.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::Sr::Cyrl::Xk - Package for language Serbian
6              
7             =cut
8              
9             # This file auto generated from Data/common/main/sr_Cyrl_XK.xml
10             # on Mon 11 Apr 5:38:30 pm GMT
11              
12             use strict;
13 1     1   1255 use warnings;
  1         3  
  1         26  
14 1     1   5 use version;
  1         2  
  1         28  
15 1     1   4  
  1         1  
  1         8  
16             our $VERSION = version->declare('v0.34.1');
17              
18             use v5.10.1;
19 1     1   97 use mro 'c3';
  1         3  
20 1     1   4 use utf8;
  1         2  
  1         8  
21 1     1   35 use if $^V ge v5.12.0, feature => 'unicode_strings';
  1         2  
  1         7  
22 1     1   30 use Types::Standard qw( Str Int HashRef ArrayRef CodeRef RegexpRef );
  1         2  
  1         16  
23 1     1   139 use Moo;
  1         3  
  1         12  
24 1     1   959  
  1         2  
  1         54  
25             extends('Locale::CLDR::Locales::Sr::Cyrl');
26             has 'display_name_language' => (
27             is => 'ro',
28             isa => CodeRef,
29             init_arg => undef,
30             default => sub {
31             sub {
32             my %languages = (
33             'bm' => 'бамананкан',
34             'bn' => 'бангла',
35             'ff' => 'фулах',
36             'gsw' => 'швајцарски немачки',
37             'ht' => 'хаићански креолски',
38             'lo' => 'лаошки',
39             'moh' => 'мохок',
40             'nqo' => 'н’ко',
41             'shi' => 'јужни шилха',
42             'si' => 'синхалски',
43             'tzm' => 'централноатласки тамашек',
44             'xh' => 'исикоса',
45             'zgh' => 'стандардни марокански тамашек',
46             'zu' => 'исизулу',
47              
48             );
49             if (@_) {
50             return $languages{$_[0]};
51             }
52             return \%languages;
53             }
54             },
55             );
56              
57             has 'display_name_region' => (
58             is => 'ro',
59             isa => HashRef[Str],
60             init_arg => undef,
61             default => sub {
62             {
63             'CG' => 'Конго',
64             'CV' => 'Кабо Верде',
65             'CZ' => 'Чешка Република',
66             'HK' => 'САР Хонгконг',
67             'KN' => 'Свети Китс и Невис',
68             'MK@alt=variant' => 'БЈР Македонија',
69             'MO' => 'САР Макао',
70             'PM' => 'Свети Пјер и Микелон',
71             'RE' => 'Реунион',
72             'UM' => 'Мања удаљена острва САД',
73             'VC' => 'Свети Винсент и Гренадини',
74              
75             }
76             },
77             );
78              
79             has 'calendar_months' => (
80             is => 'ro',
81             isa => HashRef,
82             init_arg => undef,
83             default => sub { {
84             'gregorian' => {
85             'format' => {
86             abbreviated => {
87             nonleap => [
88             'јан.',
89             'феб.',
90             'март',
91             'апр.',
92             'мај',
93             'јун',
94             'јул',
95             'авг.',
96             'септ.',
97             'окт.',
98             'нов.',
99             'дец.'
100             ],
101             leap => [
102            
103             ],
104             },
105             },
106             'stand-alone' => {
107             abbreviated => {
108             nonleap => [
109             'јан.',
110             'феб.',
111             'март',
112             'апр.',
113             'мај',
114             'јун',
115             'јул',
116             'авг.',
117             'септ.',
118             'окт.',
119             'нов.',
120             'дец.'
121             ],
122             leap => [
123            
124             ],
125             },
126             },
127             },
128             } },
129             );
130              
131             has 'calendar_days' => (
132             is => 'ro',
133             isa => HashRef,
134             init_arg => undef,
135             default => sub { {
136             'gregorian' => {
137             'format' => {
138             abbreviated => {
139             mon => 'пон.',
140             tue => 'ут.',
141             wed => 'ср.',
142             thu => 'чет.',
143             fri => 'пет.',
144             sat => 'суб.',
145             sun => 'нед.'
146             },
147             },
148             'stand-alone' => {
149             abbreviated => {
150             mon => 'пон.',
151             tue => 'ут.',
152             wed => 'ср.',
153             thu => 'чет.',
154             fri => 'пет.',
155             sat => 'суб.',
156             sun => 'нед.'
157             },
158             },
159             },
160             } },
161             );
162              
163             has 'day_period_data' => (
164             is => 'ro',
165             isa => CodeRef,
166             init_arg => undef,
167             default => sub { sub {
168             # Time in hhmm format
169             my ($self, $type, $time, $day_period_type) = @_;
170             $day_period_type //= 'default';
171             SWITCH:
172             for ($type) {
173             if ($_ eq 'generic') {
174             if($day_period_type eq 'default') {
175             return 'midnight' if $time == 0;
176             return 'noon' if $time == 1200;
177             return 'afternoon1' if $time >= 1200
178             && $time < 1800;
179             return 'evening1' if $time >= 1800
180             && $time < 2100;
181             return 'morning1' if $time >= 600
182             && $time < 1200;
183             return 'night1' if $time >= 2100;
184             return 'night1' if $time < 600;
185             }
186             if($day_period_type eq 'selection') {
187             return 'afternoon1' if $time >= 1200
188             && $time < 1800;
189             return 'evening1' if $time >= 1800
190             && $time < 2100;
191             return 'morning1' if $time >= 600
192             && $time < 1200;
193             return 'night1' if $time >= 2100;
194             return 'night1' if $time < 600;
195             }
196             last SWITCH;
197             }
198             if ($_ eq 'gregorian') {
199             if($day_period_type eq 'default') {
200             return 'midnight' if $time == 0;
201             return 'noon' if $time == 1200;
202             return 'afternoon1' if $time >= 1200
203             && $time < 1800;
204             return 'evening1' if $time >= 1800
205             && $time < 2100;
206             return 'morning1' if $time >= 600
207             && $time < 1200;
208             return 'night1' if $time >= 2100;
209             return 'night1' if $time < 600;
210             }
211             if($day_period_type eq 'selection') {
212             return 'afternoon1' if $time >= 1200
213             && $time < 1800;
214             return 'evening1' if $time >= 1800
215             && $time < 2100;
216             return 'morning1' if $time >= 600
217             && $time < 1200;
218             return 'night1' if $time >= 2100;
219             return 'night1' if $time < 600;
220             }
221             last SWITCH;
222             }
223             }
224             } },
225             );
226              
227             around day_period_data => sub {
228             my ($orig, $self) = @_;
229             return $self->$orig;
230             };
231              
232             has 'day_periods' => (
233             is => 'ro',
234             isa => HashRef,
235             init_arg => undef,
236             default => sub { {
237             'gregorian' => {
238             'format' => {
239             'abbreviated' => {
240             'afternoon1' => q{по под.},
241             'evening1' => q{увече},
242             'midnight' => q{поноћ},
243             'morning1' => q{јутро},
244             'night1' => q{ноћу},
245             'noon' => q{подне},
246             },
247             'narrow' => {
248             'afternoon1' => q{по под.},
249             'evening1' => q{вече},
250             'midnight' => q{поноћ},
251             'morning1' => q{јутро},
252             'night1' => q{ноћ},
253             'noon' => q{подне},
254             },
255             },
256             'stand-alone' => {
257             'narrow' => {
258             'am' => q{a},
259             'pm' => q{p},
260             },
261             },
262             },
263             } },
264             );
265              
266             has 'eras' => (
267             is => 'ro',
268             isa => HashRef,
269             init_arg => undef,
270             default => sub { {
271             'generic' => {
272             },
273             'gregorian' => {
274             },
275             } },
276             );
277              
278             has 'date_formats' => (
279             is => 'ro',
280             isa => HashRef,
281             init_arg => undef,
282             default => sub { {
283             'generic' => {
284             },
285             'gregorian' => {
286             },
287             } },
288             );
289              
290             has 'time_formats' => (
291             is => 'ro',
292             isa => HashRef,
293             init_arg => undef,
294             default => sub { {
295             'generic' => {
296             },
297             'gregorian' => {
298             },
299             } },
300             );
301              
302             has 'datetime_formats' => (
303             is => 'ro',
304             isa => HashRef,
305             init_arg => undef,
306             default => sub { {
307             'generic' => {
308             },
309             'gregorian' => {
310             },
311             } },
312             );
313              
314             has 'datetime_formats_available_formats' => (
315             is => 'ro',
316             isa => HashRef,
317             init_arg => undef,
318             default => sub { {
319             } },
320             );
321              
322             has 'datetime_formats_append_item' => (
323             is => 'ro',
324             isa => HashRef,
325             init_arg => undef,
326             default => sub { {
327             } },
328             );
329              
330             has 'datetime_formats_interval' => (
331             is => 'ro',
332             isa => HashRef,
333             init_arg => undef,
334             default => sub { {
335             'generic' => {
336             MMMEd => {
337             M => q{E, d. MMM – E, d. MMM},
338             d => q{E, d – E, d. MMM},
339             },
340             },
341             } },
342             );
343              
344             no Moo;
345 1     1   1346  
  1         3  
  1         6  
346             1;
347              
348             # vim: tabstop=4