File Coverage

blib/lib/Locale/CLDR/Locales/Es/Any/Cr.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::Es::Any::Cr - Package for language Spanish
6              
7             =cut
8              
9             package Locale::CLDR::Locales::Es::Any::Cr;
10             # This file auto generated from Data\common\main\es_CR.xml
11             # on Fri 13 Oct 9:14:06 am GMT
12              
13 1     1   891 use strict;
  1         2  
  1         26  
14 1     1   4 use warnings;
  1         1  
  1         21  
15 1     1   4 use version;
  1         1  
  1         6  
16              
17             our $VERSION = version->declare('v0.34.2');
18              
19 1     1   96 use v5.10.1;
  1         4  
20 1     1   6 use mro 'c3';
  1         1  
  1         5  
21 1     1   36 use utf8;
  1         2  
  1         5  
22 1     1   33 use if $^V ge v5.12.0, feature => 'unicode_strings';
  1         1  
  1         11  
23 1     1   92 use Types::Standard qw( Str Int HashRef ArrayRef CodeRef RegexpRef );
  1         1  
  1         6  
24 1     1   873 use Moo;
  1         2  
  1         4  
25              
26             extends('Locale::CLDR::Locales::Es::Any::419');
27             has 'display_name_language' => (
28             is => 'ro',
29             isa => CodeRef,
30             init_arg => undef,
31             default => sub {
32             sub {
33             my %languages = (
34             'ace' => 'acehnés',
35             'arp' => 'arapaho',
36             'bho' => 'bhojpuri',
37             'eu' => 'euskera',
38             'grc' => 'griego antiguo',
39             'lo' => 'lao',
40             'nso' => 'sotho septentrional',
41             'pa' => 'punyabí',
42             'ss' => 'siswati',
43             'sw' => 'suajili',
44             'sw_CD' => 'suajili del Congo',
45             'tn' => 'setswana',
46             'wo' => 'wolof',
47             'zgh' => 'tamazight marroquí estándar',
48              
49             );
50             if (@_) {
51             return $languages{$_[0]};
52             }
53             return \%languages;
54             }
55             },
56             );
57              
58             has 'display_name_region' => (
59             is => 'ro',
60             isa => HashRef[Str],
61             init_arg => undef,
62             default => sub {
63             {
64             'BA' => 'Bosnia y Herzegovina',
65             'GB@alt=short' => 'RU',
66             'TA' => 'Tristán de Acuña',
67             'TL' => 'Timor-Leste',
68             'UM' => 'Islas menores alejadas de EE. UU.',
69              
70             }
71             },
72             );
73              
74             has 'characters' => (
75             is => 'ro',
76             isa => HashRef,
77             init_arg => undef,
78             default => $^V ge v5.18.0
79             ? eval <<'EOT'
80             sub {
81             no warnings 'experimental::regex_sets';
82             return {
83             numbers => qr{[  \- , % ‰ + 0 1 2 3 4 5 6 7 8 9]},
84             };
85             },
86             EOT
87             : sub {
88             return {};
89             },
90 1     1   112 );
  1         2  
  1         89  
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 'currencies' => (
106             is => 'ro',
107             isa => HashRef,
108             init_arg => undef,
109             default => sub { {
110             'CRC' => {
111             symbol => '₡',
112             },
113             } },
114             );
115              
116              
117             has 'day_period_data' => (
118             is => 'ro',
119             isa => CodeRef,
120             init_arg => undef,
121             default => sub { sub {
122             # Time in hhmm format
123             my ($self, $type, $time, $day_period_type) = @_;
124             $day_period_type //= 'default';
125             SWITCH:
126             for ($type) {
127             if ($_ eq 'gregorian') {
128             if($day_period_type eq 'default') {
129             return 'noon' if $time == 1200;
130             return 'evening1' if $time >= 1200
131             && $time < 2000;
132             return 'morning1' if $time >= 0
133             && $time < 600;
134             return 'morning2' if $time >= 600
135             && $time < 1200;
136             return 'night1' if $time >= 2000
137             && $time < 2400;
138             }
139             if($day_period_type eq 'selection') {
140             return 'evening1' if $time >= 1200
141             && $time < 2000;
142             return 'morning1' if $time >= 0
143             && $time < 600;
144             return 'morning2' if $time >= 600
145             && $time < 1200;
146             return 'night1' if $time >= 2000
147             && $time < 2400;
148             }
149             last SWITCH;
150             }
151             }
152             } },
153             );
154              
155             around day_period_data => sub {
156             my ($orig, $self) = @_;
157             return $self->$orig;
158             };
159              
160             has 'day_periods' => (
161             is => 'ro',
162             isa => HashRef,
163             init_arg => undef,
164             default => sub { {
165             'gregorian' => {
166             'format' => {
167             'abbreviated' => {
168             'am' => q{a. m.},
169             'pm' => q{p. m.},
170             },
171             'wide' => {
172             'am' => q{a. m.},
173             'pm' => q{p. m.},
174             },
175             },
176             'stand-alone' => {
177             'abbreviated' => {
178             'am' => q{a. m.},
179             'pm' => q{p. m.},
180             },
181             'narrow' => {
182             'am' => q{a. m.},
183             'pm' => q{p. m.},
184             },
185             'wide' => {
186             'am' => q{a. m.},
187             'pm' => q{p. m.},
188             },
189             },
190             },
191             } },
192             );
193              
194             has 'eras' => (
195             is => 'ro',
196             isa => HashRef,
197             init_arg => undef,
198             default => sub { {
199             'gregorian' => {
200             },
201             } },
202             );
203              
204             has 'date_formats' => (
205             is => 'ro',
206             isa => HashRef,
207             init_arg => undef,
208             default => sub { {
209             'gregorian' => {
210             },
211             } },
212             );
213              
214             has 'time_formats' => (
215             is => 'ro',
216             isa => HashRef,
217             init_arg => undef,
218             default => sub { {
219             'gregorian' => {
220             },
221             } },
222             );
223              
224             has 'datetime_formats' => (
225             is => 'ro',
226             isa => HashRef,
227             init_arg => undef,
228             default => sub { {
229             'gregorian' => {
230             },
231             } },
232             );
233              
234             has 'datetime_formats_available_formats' => (
235             is => 'ro',
236             isa => HashRef,
237             init_arg => undef,
238             default => sub { {
239             } },
240             );
241              
242             has 'datetime_formats_append_item' => (
243             is => 'ro',
244             isa => HashRef,
245             init_arg => undef,
246             default => sub { {
247             } },
248             );
249              
250             has 'datetime_formats_interval' => (
251             is => 'ro',
252             isa => HashRef,
253             init_arg => undef,
254             default => sub { {
255             } },
256             );
257              
258 1     1   1210 no Moo;
  1         4  
  1         4  
259              
260             1;
261              
262             # vim: tabstop=4