File Coverage

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