File Coverage

blib/lib/Locale/CLDR/Locales/Ar/Any/Tn.pm
Criterion Covered Total %
statement 32 32 100.0
branch n/a
condition n/a
subroutine 11 11 100.0
pod n/a
total 43 43 100.0


line stmt bran cond sub pod time code
1             =encoding utf8
2              
3             =head1
4              
5             Locale::CLDR::Locales::Ar::Any::Tn - Package for language Arabic
6              
7             =cut
8              
9             # This file auto generated from Data/common/main/ar_TN.xml
10             # on Mon 11 Apr 5:23:39 pm GMT
11              
12             use strict;
13 1     1   747 use warnings;
  1         2  
  1         22  
14 1     1   4 use version;
  1         2  
  1         17  
15 1     1   4  
  1         3  
  1         3  
16             our $VERSION = version->declare('v0.34.1');
17              
18             use v5.10.1;
19 1     1   73 use mro 'c3';
  1         3  
20 1     1   5 use utf8;
  1         1  
  1         5  
21 1     1   19 use if $^V ge v5.12.0, feature => 'unicode_strings';
  1         1  
  1         18  
22 1     1   28 use Types::Standard qw( Str Int HashRef ArrayRef CodeRef RegexpRef );
  1         1  
  1         16  
23 1     1   73 use Moo;
  1         2  
  1         12  
24 1     1   766  
  1         2  
  1         4  
25             extends('Locale::CLDR::Locales::Ar::Any');
26             has 'characters' => (
27             is => 'ro',
28             isa => HashRef,
29             init_arg => undef,
30             default => $^V ge v5.18.0
31             ? eval <<'EOT'
32             sub {
33             no warnings 'experimental::regex_sets';
34             return {
35             numbers => qr{[‎ \- , . % ‰ + 0 1 2 3 4 5 6 7 8 9]},
36             };
37             },
38             EOT
39             : sub {
40             return {};
41             },
42             );
43 1     1   76  
  1         2  
  1         64  
44              
45             has 'default_numbering_system' => (
46             is => 'ro',
47             isa => Str,
48             init_arg => undef,
49             default => 'latn',
50             );
51              
52             has 'number_symbols' => (
53             is => 'ro',
54             isa => HashRef,
55             init_arg => undef,
56             default => sub { {
57             'latn' => {
58             'decimal' => q(,),
59             'group' => q(.),
60             },
61             } }
62             );
63              
64             has 'calendar_months' => (
65             is => 'ro',
66             isa => HashRef,
67             init_arg => undef,
68             default => sub { {
69             'gregorian' => {
70             'format' => {
71             abbreviated => {
72             nonleap => [
73             'جانفي',
74             'فيفري',
75             'مارس',
76             'أفريل',
77             'ماي',
78             'جوان',
79             'جويلية',
80             'أوت',
81             'سبتمبر',
82             'أكتوبر',
83             'نوفمبر',
84             'ديسمبر'
85             ],
86             leap => [
87            
88             ],
89             },
90             narrow => {
91             nonleap => [
92             'ج',
93             'ف',
94             'م',
95             'أ',
96             'م',
97             'ج',
98             'ج',
99             'أ',
100             'س',
101             'أ',
102             'ن',
103             'د'
104             ],
105             leap => [
106            
107             ],
108             },
109             wide => {
110             nonleap => [
111             'جانفي',
112             'فيفري',
113             'مارس',
114             'أفريل',
115             'ماي',
116             'جوان',
117             'جويلية',
118             'أوت',
119             'سبتمبر',
120             'أكتوبر',
121             'نوفمبر',
122             'ديسمبر'
123             ],
124             leap => [
125            
126             ],
127             },
128             },
129             'stand-alone' => {
130             abbreviated => {
131             nonleap => [
132             'جانفي',
133             'فيفري',
134             'مارس',
135             'أفريل',
136             'ماي',
137             'جوان',
138             'جويلية',
139             'أوت',
140             'سبتمبر',
141             'أكتوبر',
142             'نوفمبر',
143             'ديسمبر'
144             ],
145             leap => [
146            
147             ],
148             },
149             narrow => {
150             nonleap => [
151             'ج',
152             'ف',
153             'م',
154             'أ',
155             'م',
156             'ج',
157             'ج',
158             'أ',
159             'س',
160             'أ',
161             'ن',
162             'د'
163             ],
164             leap => [
165            
166             ],
167             },
168             wide => {
169             nonleap => [
170             'جانفي',
171             'فيفري',
172             'مارس',
173             'أفريل',
174             'ماي',
175             'جوان',
176             'جويلية',
177             'أوت',
178             'سبتمبر',
179             'أكتوبر',
180             'نوفمبر',
181             'ديسمبر'
182             ],
183             leap => [
184            
185             ],
186             },
187             },
188             },
189             } },
190             );
191              
192             has 'day_period_data' => (
193             is => 'ro',
194             isa => CodeRef,
195             init_arg => undef,
196             default => sub { sub {
197             # Time in hhmm format
198             my ($self, $type, $time, $day_period_type) = @_;
199             $day_period_type //= 'default';
200             SWITCH:
201             for ($type) {
202             if ($_ eq 'gregorian') {
203             if($day_period_type eq 'default') {
204             return 'afternoon1' if $time >= 1200
205             && $time < 1300;
206             return 'afternoon2' if $time >= 1300
207             && $time < 1800;
208             return 'evening1' if $time >= 1800
209             && $time < 2400;
210             return 'morning1' if $time >= 300
211             && $time < 600;
212             return 'morning2' if $time >= 600
213             && $time < 1200;
214             return 'night1' if $time >= 0
215             && $time < 100;
216             return 'night2' if $time >= 100
217             && $time < 300;
218             }
219             if($day_period_type eq 'selection') {
220             return 'afternoon1' if $time >= 1200
221             && $time < 1300;
222             return 'afternoon2' if $time >= 1300
223             && $time < 1800;
224             return 'evening1' if $time >= 1800
225             && $time < 2400;
226             return 'morning1' if $time >= 300
227             && $time < 600;
228             return 'morning2' if $time >= 600
229             && $time < 1200;
230             return 'night1' if $time >= 0
231             && $time < 100;
232             return 'night2' if $time >= 100
233             && $time < 300;
234             }
235             last SWITCH;
236             }
237             }
238             } },
239             );
240              
241             around day_period_data => sub {
242             my ($orig, $self) = @_;
243             return $self->$orig;
244             };
245              
246             has 'eras' => (
247             is => 'ro',
248             isa => HashRef,
249             init_arg => undef,
250             default => sub { {
251             'gregorian' => {
252             },
253             } },
254             );
255              
256             has 'date_formats' => (
257             is => 'ro',
258             isa => HashRef,
259             init_arg => undef,
260             default => sub { {
261             'gregorian' => {
262             },
263             } },
264             );
265              
266             has 'time_formats' => (
267             is => 'ro',
268             isa => HashRef,
269             init_arg => undef,
270             default => sub { {
271             'gregorian' => {
272             },
273             } },
274             );
275              
276             has 'datetime_formats' => (
277             is => 'ro',
278             isa => HashRef,
279             init_arg => undef,
280             default => sub { {
281             'gregorian' => {
282             },
283             } },
284             );
285              
286             has 'datetime_formats_available_formats' => (
287             is => 'ro',
288             isa => HashRef,
289             init_arg => undef,
290             default => sub { {
291             } },
292             );
293              
294             has 'datetime_formats_append_item' => (
295             is => 'ro',
296             isa => HashRef,
297             init_arg => undef,
298             default => sub { {
299             } },
300             );
301              
302             has 'datetime_formats_interval' => (
303             is => 'ro',
304             isa => HashRef,
305             init_arg => undef,
306             default => sub { {
307             } },
308             );
309              
310             no Moo;
311 1     1   984  
  1         2  
  1         3  
312             1;
313              
314             # vim: tabstop=4