File Coverage

blib/lib/Locale/CLDR/Locales/En/Any/Ie.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 NAME
4              
5             Locale::CLDR::Locales::En::Any::Ie - Package for language English
6              
7             =cut
8              
9             package Locale::CLDR::Locales::En::Any::Ie;
10             # This file auto generated from Data\common\main\en_IE.xml
11             # on Fri 13 Oct 9:13:20 am GMT
12              
13 1     1   858 use strict;
  1         2  
  1         25  
14 1     1   4 use warnings;
  1         2  
  1         20  
15 1     1   5 use version;
  1         1  
  1         5  
16              
17             our $VERSION = version->declare('v0.34.2');
18              
19 1     1   85 use v5.10.1;
  1         3  
20 1     1   5 use mro 'c3';
  1         3  
  1         5  
21 1     1   31 use utf8;
  1         2  
  1         4  
22 1     1   28 use if $^V ge v5.12.0, feature => 'unicode_strings';
  1         2  
  1         10  
23 1     1   117 use Types::Standard qw( Str Int HashRef ArrayRef CodeRef RegexpRef );
  1         2  
  1         6  
24 1     1   891 use Moo;
  1         2  
  1         6  
25              
26             extends('Locale::CLDR::Locales::En::Any::001');
27             has 'day_period_data' => (
28             is => 'ro',
29             isa => CodeRef,
30             init_arg => undef,
31             default => sub { sub {
32             # Time in hhmm format
33             my ($self, $type, $time, $day_period_type) = @_;
34             $day_period_type //= 'default';
35             SWITCH:
36             for ($type) {
37             if ($_ eq 'generic') {
38             if($day_period_type eq 'default') {
39             return 'midnight' if $time == 0;
40             return 'noon' if $time == 1200;
41             return 'afternoon1' if $time >= 1200
42             && $time < 1800;
43             return 'evening1' if $time >= 1800
44             && $time < 2100;
45             return 'morning1' if $time >= 600
46             && $time < 1200;
47             return 'night1' if $time >= 2100;
48             return 'night1' if $time < 600;
49             }
50             if($day_period_type eq 'selection') {
51             return 'afternoon1' if $time >= 1200
52             && $time < 1800;
53             return 'evening1' if $time >= 1800
54             && $time < 2100;
55             return 'morning1' if $time >= 600
56             && $time < 1200;
57             return 'night1' if $time >= 2100;
58             return 'night1' if $time < 600;
59             }
60             last SWITCH;
61             }
62             if ($_ eq 'gregorian') {
63             if($day_period_type eq 'default') {
64             return 'midnight' if $time == 0;
65             return 'noon' if $time == 1200;
66             return 'afternoon1' if $time >= 1200
67             && $time < 1800;
68             return 'evening1' if $time >= 1800
69             && $time < 2100;
70             return 'morning1' if $time >= 600
71             && $time < 1200;
72             return 'night1' if $time >= 2100;
73             return 'night1' if $time < 600;
74             }
75             if($day_period_type eq 'selection') {
76             return 'afternoon1' if $time >= 1200
77             && $time < 1800;
78             return 'evening1' if $time >= 1800
79             && $time < 2100;
80             return 'morning1' if $time >= 600
81             && $time < 1200;
82             return 'night1' if $time >= 2100;
83             return 'night1' if $time < 600;
84             }
85             last SWITCH;
86             }
87             }
88             } },
89             );
90              
91             around day_period_data => sub {
92             my ($orig, $self) = @_;
93             return $self->$orig;
94             };
95              
96             has 'day_periods' => (
97             is => 'ro',
98             isa => HashRef,
99             init_arg => undef,
100             default => sub { {
101             'gregorian' => {
102             'format' => {
103             'wide' => {
104             'am' => q{a.m.},
105             'pm' => q{p.m.},
106             },
107             },
108             },
109             } },
110             );
111              
112             has 'eras' => (
113             is => 'ro',
114             isa => HashRef,
115             init_arg => undef,
116             default => sub { {
117             'generic' => {
118             },
119             'gregorian' => {
120             },
121             } },
122             );
123              
124             has 'date_formats' => (
125             is => 'ro',
126             isa => HashRef,
127             init_arg => undef,
128             default => sub { {
129             'generic' => {
130             'full' => q{EEEE d MMMM y G},
131             },
132             'gregorian' => {
133             'full' => q{EEEE d MMMM y},
134             },
135             } },
136             );
137              
138             has 'time_formats' => (
139             is => 'ro',
140             isa => HashRef,
141             init_arg => undef,
142             default => sub { {
143             'generic' => {
144             },
145             'gregorian' => {
146             'full' => q{HH:mm:ss zzzz},
147             'long' => q{HH:mm:ss z},
148             'medium' => q{HH:mm:ss},
149             'short' => q{HH:mm},
150             },
151             } },
152             );
153              
154             has 'datetime_formats' => (
155             is => 'ro',
156             isa => HashRef,
157             init_arg => undef,
158             default => sub { {
159             'generic' => {
160             },
161             'gregorian' => {
162             },
163             } },
164             );
165              
166             has 'datetime_formats_available_formats' => (
167             is => 'ro',
168             isa => HashRef,
169             init_arg => undef,
170             default => sub { {
171             'generic' => {
172             Md => q{d/M},
173             yyyyMEd => q{E, d/M/y G},
174             yyyyMMMEd => q{E d MMM y G},
175             yyyyMd => q{d/M/y G},
176             },
177             'gregorian' => {
178             MEd => q{E, d/M},
179             Md => q{d/M},
180             yMEd => q{E, d/M/y},
181             yMMMEd => q{E d MMM y},
182             yMd => q{d/M/y},
183             },
184             } },
185             );
186              
187             has 'datetime_formats_append_item' => (
188             is => 'ro',
189             isa => HashRef,
190             init_arg => undef,
191             default => sub { {
192             } },
193             );
194              
195             has 'datetime_formats_interval' => (
196             is => 'ro',
197             isa => HashRef,
198             init_arg => undef,
199             default => sub { {
200             'generic' => {
201             yM => {
202             M => q{MM/y – MM/y G},
203             y => q{MM/y – MM/y G},
204             },
205             yMEd => {
206             M => q{E dd/MM/y – E dd/MM/y G},
207             d => q{E dd/MM/y – E dd/MM/y G},
208             y => q{E dd/MM/y – E dd/MM/y G},
209             },
210             yMMMEd => {
211             M => q{E d MMM – E d MMM y G},
212             d => q{E d – E d MMM y G},
213             y => q{E d MMM y – E d MMM y G},
214             },
215             yMd => {
216             M => q{dd/MM/y – dd/MM/y G},
217             d => q{dd/MM/y – dd/MM/y G},
218             y => q{dd/MM/y – dd/MM/y G},
219             },
220             },
221             'gregorian' => {
222             yMEd => {
223             M => q{E dd/MM/y – E dd/MM/y},
224             d => q{E dd/MM/y – E dd/MM/y},
225             y => q{E dd/MM/y – E dd/MM/y},
226             },
227             yMMMEd => {
228             M => q{E d MMM – E d MMM y},
229             d => q{E d – E d MMM y},
230             y => q{E d MMM y – E d MMM y},
231             },
232             },
233             } },
234             );
235              
236             has 'time_zone_names' => (
237             is => 'ro',
238             isa => HashRef,
239             init_arg => undef,
240             default => sub { {
241             'Europe/Dublin' => {
242             short => {
243             'daylight' => q#IST#,
244             },
245             },
246             } }
247             );
248 1     1   1089 no Moo;
  1         2  
  1         4  
249              
250             1;
251              
252             # vim: tabstop=4