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