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