File Coverage

blib/lib/Locale/CLDR/Locales/Af/Any/Na.pm
Criterion Covered Total %
statement 29 29 100.0
branch n/a
condition n/a
subroutine 10 10 100.0
pod n/a
total 39 39 100.0


line stmt bran cond sub pod time code
1             =encoding utf8
2              
3             =head1
4              
5             Locale::CLDR::Locales::Af::Any::Na - Package for language Afrikaans
6              
7             =cut
8              
9             package Locale::CLDR::Locales::Af::Any::Na;
10             # This file auto generated from Data\common\main\af_NA.xml
11             # on Sun 16 Dec 4:05:00 pm GMT
12              
13 1     1   4685 use strict;
  1         3  
  1         35  
14 1     1   5 use warnings;
  1         2  
  1         32  
15 1     1   5 use version;
  1         2  
  1         17  
16              
17             our $VERSION = version->declare('v0.34.0');
18              
19 1     1   142 use v5.10.1;
  1         4  
20 1     1   6 use mro 'c3';
  1         2  
  1         10  
21 1     1   41 use utf8;
  1         2  
  1         10  
22 1     1   37 use if $^V ge v5.12.0, feature => 'unicode_strings';
  1         2  
  1         17  
23 1     1   144 use Types::Standard qw( Str Int HashRef ArrayRef CodeRef RegexpRef );
  1         2  
  1         11  
24 1     1   1609 use Moo;
  1         2  
  1         8  
25              
26             extends('Locale::CLDR::Locales::Af::Any');
27             has 'currencies' => (
28             is => 'ro',
29             isa => HashRef,
30             init_arg => undef,
31             default => sub { {
32             'NAD' => {
33             symbol => '$',
34             },
35             } },
36             );
37              
38              
39             has 'day_period_data' => (
40             is => 'ro',
41             isa => CodeRef,
42             init_arg => undef,
43             default => sub { sub {
44             # Time in hhmm format
45             my ($self, $type, $time, $day_period_type) = @_;
46             $day_period_type //= 'default';
47             SWITCH:
48             for ($type) {
49             if ($_ eq 'generic') {
50             if($day_period_type eq 'default') {
51             return 'midnight' if $time == 0;
52             return 'evening1' if $time >= 1800
53             && $time < 2400;
54             return 'night1' if $time >= 0
55             && $time < 500;
56             return 'morning1' if $time >= 500
57             && $time < 1200;
58             return 'afternoon1' if $time >= 1200
59             && $time < 1800;
60             }
61             if($day_period_type eq 'selection') {
62             return 'morning1' if $time >= 500
63             && $time < 1200;
64             return 'afternoon1' if $time >= 1200
65             && $time < 1800;
66             return 'night1' if $time >= 0
67             && $time < 500;
68             return 'evening1' if $time >= 1800
69             && $time < 2400;
70             }
71             last SWITCH;
72             }
73             if ($_ eq 'gregorian') {
74             if($day_period_type eq 'default') {
75             return 'midnight' if $time == 0;
76             return 'evening1' if $time >= 1800
77             && $time < 2400;
78             return 'night1' if $time >= 0
79             && $time < 500;
80             return 'morning1' if $time >= 500
81             && $time < 1200;
82             return 'afternoon1' if $time >= 1200
83             && $time < 1800;
84             }
85             if($day_period_type eq 'selection') {
86             return 'morning1' if $time >= 500
87             && $time < 1200;
88             return 'afternoon1' if $time >= 1200
89             && $time < 1800;
90             return 'night1' if $time >= 0
91             && $time < 500;
92             return 'evening1' if $time >= 1800
93             && $time < 2400;
94             }
95             last SWITCH;
96             }
97             }
98             } },
99             );
100              
101             around day_period_data => sub {
102             my ($orig, $self) = @_;
103             return $self->$orig;
104             };
105              
106             has 'eras' => (
107             is => 'ro',
108             isa => HashRef,
109             init_arg => undef,
110             default => sub { {
111             'generic' => {
112             },
113             'gregorian' => {
114             },
115             } },
116             );
117              
118             has 'date_formats' => (
119             is => 'ro',
120             isa => HashRef,
121             init_arg => undef,
122             default => sub { {
123             'generic' => {
124             'full' => q{EEEE d MMMM y G},
125             'long' => q{d MMMM y G},
126             'medium' => q{d MMM y G},
127             },
128             'gregorian' => {
129             'full' => q{EEEE d MMMM y},
130             'long' => q{d MMMM y},
131             'medium' => q{d MMM y},
132             },
133             } },
134             );
135              
136             has 'time_formats' => (
137             is => 'ro',
138             isa => HashRef,
139             init_arg => undef,
140             default => sub { {
141             'generic' => {
142             },
143             'gregorian' => {
144             },
145             } },
146             );
147              
148             has 'datetime_formats' => (
149             is => 'ro',
150             isa => HashRef,
151             init_arg => undef,
152             default => sub { {
153             'generic' => {
154             },
155             'gregorian' => {
156             },
157             } },
158             );
159              
160             has 'datetime_formats_available_formats' => (
161             is => 'ro',
162             isa => HashRef,
163             init_arg => undef,
164             default => sub { {
165             } },
166             );
167              
168             has 'datetime_formats_append_item' => (
169             is => 'ro',
170             isa => HashRef,
171             init_arg => undef,
172             default => sub { {
173             } },
174             );
175              
176             has 'datetime_formats_interval' => (
177             is => 'ro',
178             isa => HashRef,
179             init_arg => undef,
180             default => sub { {
181             } },
182             );
183              
184 1     1   1182 no Moo;
  1         2  
  1         6  
185              
186             1;
187              
188             # vim: tabstop=4