File Coverage

blib/lib/Locale/CLDR/Locales/Pa/Arab.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 NAME
4              
5             Locale::CLDR::Locales::Pa::Arab - Package for language Punjabi
6              
7             =cut
8              
9             package Locale::CLDR::Locales::Pa::Arab;
10             # This file auto generated from Data\common\main\pa_Arab.xml
11             # on Fri 13 Oct 9:33:09 am GMT
12              
13 1     1   478 use strict;
  1         2  
  1         26  
14 1     1   4 use warnings;
  1         2  
  1         19  
15 1     1   4 use version;
  1         2  
  1         4  
16              
17             our $VERSION = version->declare('v0.34.2');
18              
19 1     1   94 use v5.10.1;
  1         4  
20 1     1   5 use mro 'c3';
  1         1  
  1         4  
21 1     1   31 use utf8;
  1         2  
  1         4  
22 1     1   29 use if $^V ge v5.12.0, feature => 'unicode_strings';
  1         2  
  1         10  
23 1     1   89 use Types::Standard qw( Str Int HashRef ArrayRef CodeRef RegexpRef );
  1         2  
  1         5  
24 1     1   931 use Moo;
  1         2  
  1         4  
25              
26             extends('Locale::CLDR::Locales::Pa');
27             has 'display_name_language' => (
28             is => 'ro',
29             isa => CodeRef,
30             init_arg => undef,
31             default => sub {
32             sub {
33             my %languages = (
34             'pa' => 'پنجابی',
35              
36             );
37             if (@_) {
38             return $languages{$_[0]};
39             }
40             return \%languages;
41             }
42             },
43             );
44              
45             has 'display_name_script' => (
46             is => 'ro',
47             isa => CodeRef,
48             init_arg => undef,
49             default => sub {
50             sub {
51             my %scripts = (
52             'Arab' => 'عربی',
53             'Guru' => 'گُرمُکھی',
54              
55             );
56             if ( @_ ) {
57             return $scripts{$_[0]};
58             }
59             return \%scripts;
60             }
61             }
62             );
63              
64             has 'display_name_region' => (
65             is => 'ro',
66             isa => HashRef[Str],
67             init_arg => undef,
68             default => sub {
69             {
70             'PK' => 'پاکستان',
71              
72             }
73             },
74             );
75              
76             has 'text_orientation' => (
77             is => 'ro',
78             isa => HashRef[Str],
79             init_arg => undef,
80             default => sub { return {
81             lines => '',
82             characters => 'right-to-left',
83             }}
84             );
85              
86             has 'characters' => (
87             is => 'ro',
88             isa => HashRef,
89             init_arg => undef,
90             default => $^V ge v5.18.0
91             ? eval <<'EOT'
92             sub {
93             no warnings 'experimental::regex_sets';
94             return {
95             auxiliary => qr{[‎‏ أ ٻ ة ٺ ټ ٽ]},
96             index => ['ء', 'آ', 'ؤ', 'ئ', 'ا', 'ب', 'پ', 'ت', 'ث', 'ٹ', 'ج', 'چ', 'ح', 'خ', 'د', 'ذ', 'ڈ', 'ر', 'ز', 'ڑ', 'ژ', 'س', 'ش', 'ص', 'ض', 'ط', 'ظ', 'ع', 'غ', 'ف', 'ق', 'ک', 'گ', 'ل', 'م', 'ن', 'ں', 'ه', 'ھ', 'ہ', 'و', 'ی', 'ے'],
97             main => qr{[ُ ء آ ؤ ئ ا ب پ ت ث ٹ ج چ ح خ د ذ ڈ ر ز ڑ ژ س ش ص ض ط ظ ع غ ف ق ک گ ل م ن ں ه ھ ہ و ی ے]},
98             numbers => qr{[‎ \- , . % ‰ + 0 1 2 3 4 5 6 7 8 9]},
99             };
100             },
101             EOT
102             : sub {
103             return { index => ['ء', 'آ', 'ؤ', 'ئ', 'ا', 'ب', 'پ', 'ت', 'ث', 'ٹ', 'ج', 'چ', 'ح', 'خ', 'د', 'ذ', 'ڈ', 'ر', 'ز', 'ڑ', 'ژ', 'س', 'ش', 'ص', 'ض', 'ط', 'ظ', 'ع', 'غ', 'ف', 'ق', 'ک', 'گ', 'ل', 'م', 'ن', 'ں', 'ه', 'ھ', 'ہ', 'و', 'ی', 'ے'], };
104             },
105 1     1   105 );
  1         2  
  1         177  
106              
107              
108             has 'yesstr' => (
109             is => 'ro',
110             isa => RegexpRef,
111             init_arg => undef,
112             default => sub { qr'^(?i:ہاں|yes|y)$' }
113             );
114              
115             has 'nostr' => (
116             is => 'ro',
117             isa => RegexpRef,
118             init_arg => undef,
119             default => sub { qr'^(?i:نہيں|no|n)$' }
120             );
121              
122             has 'default_numbering_system' => (
123             is => 'ro',
124             isa => Str,
125             init_arg => undef,
126             default => 'arabext',
127             );
128              
129             has native_numbering_system => (
130             is => 'ro',
131             isa => Str,
132             init_arg => undef,
133             default => 'arabext',
134             );
135              
136             has 'number_symbols' => (
137             is => 'ro',
138             isa => HashRef,
139             init_arg => undef,
140             default => sub { {
141             'latn' => {
142             'minusSign' => q(‎-),
143             'plusSign' => q(‎+),
144             },
145             } }
146             );
147              
148             has 'currencies' => (
149             is => 'ro',
150             isa => HashRef,
151             init_arg => undef,
152             default => sub { {
153             'EUR' => {
154             display_name => {
155             'currency' => q(يورو),
156             },
157             },
158             'INR' => {
159             display_name => {
160             'currency' => q(روپئیہ [INR]),
161             },
162             },
163             'PKR' => {
164             symbol => 'ر',
165             display_name => {
166             'currency' => q(روپئیہ),
167             },
168             },
169             } },
170             );
171              
172              
173             has 'calendar_months' => (
174             is => 'ro',
175             isa => HashRef,
176             init_arg => undef,
177             default => sub { {
178             'gregorian' => {
179             'format' => {
180             wide => {
181             nonleap => [
182             'جنوری',
183             'فروری',
184             'مارچ',
185             'اپریل',
186             'مئ',
187             'جون',
188             'جولائی',
189             'اگست',
190             'ستمبر',
191             'اکتوبر',
192             'نومبر',
193             'دسمبر'
194             ],
195             leap => [
196            
197             ],
198             },
199             },
200             },
201             } },
202             );
203              
204             has 'calendar_days' => (
205             is => 'ro',
206             isa => HashRef,
207             init_arg => undef,
208             default => sub { {
209             'gregorian' => {
210             'format' => {
211             wide => {
212             mon => 'پیر',
213             tue => 'منگل',
214             wed => 'بُدھ',
215             thu => 'جمعرات',
216             fri => 'جمعہ',
217             sat => 'ہفتہ',
218             sun => 'اتوار'
219             },
220             },
221             },
222             } },
223             );
224              
225             has 'calendar_quarters' => (
226             is => 'ro',
227             isa => HashRef,
228             init_arg => undef,
229             default => sub { {
230             'gregorian' => {
231             'format' => {
232             wide => {0 => 'چوتھاي پہلاں',
233             1 => 'چوتھاي دوجا',
234             2 => 'چوتھاي تيجا',
235             3 => 'چوتھاي چوتھا'
236             },
237             },
238             },
239             } },
240             );
241              
242             has 'day_period_data' => (
243             is => 'ro',
244             isa => CodeRef,
245             init_arg => undef,
246             default => sub { sub {
247             # Time in hhmm format
248             my ($self, $type, $time, $day_period_type) = @_;
249             $day_period_type //= 'default';
250             SWITCH:
251             for ($type) {
252             if ($_ eq 'generic') {
253             if($day_period_type eq 'default') {
254             return 'midnight' if $time == 0;
255             return 'afternoon1' if $time >= 1200
256             && $time < 1600;
257             return 'evening1' if $time >= 1600
258             && $time < 2100;
259             return 'morning1' if $time >= 400
260             && $time < 1200;
261             return 'night1' if $time >= 2100;
262             return 'night1' if $time < 400;
263             }
264             if($day_period_type eq 'selection') {
265             return 'afternoon1' if $time >= 1200
266             && $time < 1600;
267             return 'evening1' if $time >= 1600
268             && $time < 2100;
269             return 'morning1' if $time >= 400
270             && $time < 1200;
271             return 'night1' if $time >= 2100;
272             return 'night1' if $time < 400;
273             }
274             last SWITCH;
275             }
276             if ($_ eq 'gregorian') {
277             if($day_period_type eq 'default') {
278             return 'midnight' if $time == 0;
279             return 'afternoon1' if $time >= 1200
280             && $time < 1600;
281             return 'evening1' if $time >= 1600
282             && $time < 2100;
283             return 'morning1' if $time >= 400
284             && $time < 1200;
285             return 'night1' if $time >= 2100;
286             return 'night1' if $time < 400;
287             }
288             if($day_period_type eq 'selection') {
289             return 'afternoon1' if $time >= 1200
290             && $time < 1600;
291             return 'evening1' if $time >= 1600
292             && $time < 2100;
293             return 'morning1' if $time >= 400
294             && $time < 1200;
295             return 'night1' if $time >= 2100;
296             return 'night1' if $time < 400;
297             }
298             last SWITCH;
299             }
300             }
301             } },
302             );
303              
304             around day_period_data => sub {
305             my ($orig, $self) = @_;
306             return $self->$orig;
307             };
308              
309             has 'eras' => (
310             is => 'ro',
311             isa => HashRef,
312             init_arg => undef,
313             default => sub { {
314             'generic' => {
315             },
316             'gregorian' => {
317             abbreviated => {
318             '0' => 'ايساپورو',
319             '1' => 'سں'
320             },
321             wide => {
322             '0' => 'ايساپورو',
323             '1' => 'سں'
324             },
325             },
326             } },
327             );
328              
329             has 'date_formats' => (
330             is => 'ro',
331             isa => HashRef,
332             init_arg => undef,
333             default => sub { {
334             'generic' => {
335             'full' => q{EEEE, dd MMMM y G},
336             'long' => q{d MMMM y G},
337             'medium' => q{d MMM y G},
338             'short' => q{dd/MM/y GGGGG},
339             },
340             'gregorian' => {
341             'full' => q{EEEE, dd MMMM y},
342             'long' => q{d MMMM y},
343             'medium' => q{d MMM y},
344             'short' => q{dd/MM/y},
345             },
346             } },
347             );
348              
349             has 'time_formats' => (
350             is => 'ro',
351             isa => HashRef,
352             init_arg => undef,
353             default => sub { {
354             'generic' => {
355             },
356             'gregorian' => {
357             'full' => q{h:mm:ss a zzzz},
358             'long' => q{h:mm:ss a z},
359             'medium' => q{h:mm:ss a},
360             'short' => q{h:mm a},
361             },
362             } },
363             );
364              
365             has 'datetime_formats' => (
366             is => 'ro',
367             isa => HashRef,
368             init_arg => undef,
369             default => sub { {
370             'generic' => {
371             },
372             'gregorian' => {
373             },
374             } },
375             );
376              
377             has 'datetime_formats_available_formats' => (
378             is => 'ro',
379             isa => HashRef,
380             init_arg => undef,
381             default => sub { {
382             'generic' => {
383             HHmmss => q{HH:mm:ss},
384             Md => q{d/M},
385             ms => q{mm:ss},
386             yMMM => q{MMM y},
387             yQQQ => q{QQQ y},
388             },
389             'gregorian' => {
390             HHmmss => q{HH:mm:ss},
391             Md => q{d/M},
392             mmss => q{mm:ss},
393             yMMM => q{MMM y},
394             yQQQ => q{QQQ y},
395             },
396             } },
397             );
398              
399             has 'datetime_formats_append_item' => (
400             is => 'ro',
401             isa => HashRef,
402             init_arg => undef,
403             default => sub { {
404             } },
405             );
406              
407             has 'datetime_formats_interval' => (
408             is => 'ro',
409             isa => HashRef,
410             init_arg => undef,
411             default => sub { {
412             } },
413             );
414              
415 1     1   1705 no Moo;
  1         2  
  1         4  
416              
417             1;
418              
419             # vim: tabstop=4