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