File Coverage

blib/lib/Locale/CLDR/Locales/Ar/Any/Ly.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::Ly - Package for language Arabic
6              
7             =cut
8              
9             # This file auto generated from Data/common/main/ar_LY.xml
10             # on Mon 11 Apr 5:23:38 pm GMT
11              
12             use strict;
13 1     1   753 use warnings;
  1         2  
  1         23  
14 1     1   4 use version;
  1         2  
  1         17  
15 1     1   4  
  1         1  
  1         4  
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   4 use utf8;
  1         2  
  1         4  
21 1     1   27 use if $^V ge v5.12.0, feature => 'unicode_strings';
  1         6  
  1         6  
22 1     1   26 use Types::Standard qw( Str Int HashRef ArrayRef CodeRef RegexpRef );
  1         1  
  1         9  
23 1     1   80 use Moo;
  1         2  
  1         5  
24 1     1   787  
  1         1  
  1         5  
25             extends('Locale::CLDR::Locales::Ar::Any');
26             has 'display_name_language' => (
27             is => 'ro',
28             isa => CodeRef,
29             init_arg => undef,
30             default => sub {
31             sub {
32             my %languages = (
33             'arn' => 'المابودونجونية',
34             'gn' => 'الغورانية',
35             'hsb' => 'صوربيا العليا',
36             'lo' => 'اللاوو',
37             'sh' => 'الكرواتية الصربية',
38             'sma' => 'سامي الجنوبية',
39             'sw' => 'السواحيلية',
40             'sw_CD' => 'السواحيلية الكونغولية',
41             'ti' => 'التيغرينية',
42              
43             );
44             if (@_) {
45             return $languages{$_[0]};
46             }
47             return \%languages;
48             }
49             },
50             );
51              
52             has 'display_name_region' => (
53             is => 'ro',
54             isa => HashRef[Str],
55             init_arg => undef,
56             default => sub {
57             {
58             'EA' => 'سبتة ومليلية',
59             'MS' => 'مونتيسيرات',
60             'UY' => 'أوروغواي',
61              
62             }
63             },
64             );
65              
66             has 'characters' => (
67             is => 'ro',
68             isa => HashRef,
69             init_arg => undef,
70             default => $^V ge v5.18.0
71             ? eval <<'EOT'
72             sub {
73             no warnings 'experimental::regex_sets';
74             return {
75             numbers => qr{[‎ \- , . % ‰ + 0 1 2 3 4 5 6 7 8 9]},
76             };
77             },
78             EOT
79             : sub {
80             return {};
81             },
82             );
83 1     1   86  
  1         8  
  1         76  
84              
85             has 'default_numbering_system' => (
86             is => 'ro',
87             isa => Str,
88             init_arg => undef,
89             default => 'latn',
90             );
91              
92             has 'number_symbols' => (
93             is => 'ro',
94             isa => HashRef,
95             init_arg => undef,
96             default => sub { {
97             'latn' => {
98             'decimal' => q(,),
99             'group' => q(.),
100             },
101             } }
102             );
103              
104             has 'day_period_data' => (
105             is => 'ro',
106             isa => CodeRef,
107             init_arg => undef,
108             default => sub { sub {
109             # Time in hhmm format
110             my ($self, $type, $time, $day_period_type) = @_;
111             $day_period_type //= 'default';
112             SWITCH:
113             for ($type) {
114             if ($_ eq 'gregorian') {
115             if($day_period_type eq 'default') {
116             return 'afternoon1' if $time >= 1200
117             && $time < 1300;
118             return 'afternoon2' if $time >= 1300
119             && $time < 1800;
120             return 'evening1' if $time >= 1800
121             && $time < 2400;
122             return 'morning1' if $time >= 300
123             && $time < 600;
124             return 'morning2' if $time >= 600
125             && $time < 1200;
126             return 'night1' if $time >= 0
127             && $time < 100;
128             return 'night2' if $time >= 100
129             && $time < 300;
130             }
131             if($day_period_type eq 'selection') {
132             return 'afternoon1' if $time >= 1200
133             && $time < 1300;
134             return 'afternoon2' if $time >= 1300
135             && $time < 1800;
136             return 'evening1' if $time >= 1800
137             && $time < 2400;
138             return 'morning1' if $time >= 300
139             && $time < 600;
140             return 'morning2' if $time >= 600
141             && $time < 1200;
142             return 'night1' if $time >= 0
143             && $time < 100;
144             return 'night2' if $time >= 100
145             && $time < 300;
146             }
147             last SWITCH;
148             }
149             }
150             } },
151             );
152              
153             around day_period_data => sub {
154             my ($orig, $self) = @_;
155             return $self->$orig;
156             };
157              
158             has 'day_periods' => (
159             is => 'ro',
160             isa => HashRef,
161             init_arg => undef,
162             default => sub { {
163             'gregorian' => {
164             'format' => {
165             'abbreviated' => {
166             'afternoon1' => q{ظهرًا},
167             'afternoon2' => q{بعد الظهر},
168             'evening1' => q{مساءً},
169             'morning1' => q{فجرًا},
170             'morning2' => q{ص},
171             'night1' => q{منتصف الليل},
172             'night2' => q{ل},
173             },
174             },
175             },
176             } },
177             );
178              
179             has 'eras' => (
180             is => 'ro',
181             isa => HashRef,
182             init_arg => undef,
183             default => sub { {
184             'gregorian' => {
185             },
186             } },
187             );
188              
189             has 'date_formats' => (
190             is => 'ro',
191             isa => HashRef,
192             init_arg => undef,
193             default => sub { {
194             'gregorian' => {
195             },
196             } },
197             );
198              
199             has 'time_formats' => (
200             is => 'ro',
201             isa => HashRef,
202             init_arg => undef,
203             default => sub { {
204             'gregorian' => {
205             },
206             } },
207             );
208              
209             has 'datetime_formats' => (
210             is => 'ro',
211             isa => HashRef,
212             init_arg => undef,
213             default => sub { {
214             'gregorian' => {
215             },
216             } },
217             );
218              
219             has 'datetime_formats_available_formats' => (
220             is => 'ro',
221             isa => HashRef,
222             init_arg => undef,
223             default => sub { {
224             } },
225             );
226              
227             has 'datetime_formats_append_item' => (
228             is => 'ro',
229             isa => HashRef,
230             init_arg => undef,
231             default => sub { {
232             } },
233             );
234              
235             has 'datetime_formats_interval' => (
236             is => 'ro',
237             isa => HashRef,
238             init_arg => undef,
239             default => sub { {
240             } },
241             );
242              
243             no Moo;
244 1     1   973  
  1         2  
  1         3  
245             1;
246              
247             # vim: tabstop=4