File Coverage

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