File Coverage

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