File Coverage

blib/lib/Locale/CLDR/Locales/De/Any/At.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::De::Any::At - Package for language German
6              
7             =cut
8              
9             package Locale::CLDR::Locales::De::Any::At;
10             # This file auto generated from Data\common\main\de_AT.xml
11             # on Fri 13 Oct 9:11:51 am GMT
12              
13 1     1   1072 use strict;
  1         2  
  1         29  
14 1     1   4 use warnings;
  1         2  
  1         24  
15 1     1   5 use version;
  1         7  
  1         6  
16              
17             our $VERSION = version->declare('v0.34.2');
18              
19 1     1   94 use v5.10.1;
  1         28  
20 1     1   5 use mro 'c3';
  1         2  
  1         8  
21 1     1   34 use utf8;
  1         1  
  1         7  
22 1     1   30 use if $^V ge v5.12.0, feature => 'unicode_strings';
  1         2  
  1         11  
23 1     1   126 use Types::Standard qw( Str Int HashRef ArrayRef CodeRef RegexpRef );
  1         1  
  1         10  
24 1     1   979 use Moo;
  1         2  
  1         6  
25              
26             extends('Locale::CLDR::Locales::De::Any');
27             has 'display_name_language' => (
28             is => 'ro',
29             isa => CodeRef,
30             init_arg => undef,
31             default => sub {
32             sub {
33             my %languages = (
34             'ar_001' => 'modernes Hocharabisch',
35             'car' => 'karibische Sprache',
36             'chb' => 'Chibcha-Sprache',
37             'del' => 'Delawarisch',
38             'fur' => 'Friulanisch',
39             'ha' => 'Hausa',
40             'haw' => 'Hawaiianisch',
41             'hmn' => 'Miao-Sprache',
42             'mus' => 'Muskogee-Sprache',
43             'niu' => 'Niueanisch',
44             'pag' => 'Pangasinensisch',
45             'sh' => 'Serbokroatisch',
46             'szl' => 'Schlesisch',
47              
48             );
49             if (@_) {
50             return $languages{$_[0]};
51             }
52             return \%languages;
53             }
54             },
55             );
56              
57             has 'display_name_region' => (
58             is => 'ro',
59             isa => HashRef[Str],
60             init_arg => undef,
61             default => sub {
62             {
63             'SJ' => 'Svalbard und Jan Mayen',
64              
65             }
66             },
67             );
68              
69             has 'display_name_measurement_system' => (
70             is => 'ro',
71             isa => HashRef[Str],
72             init_arg => undef,
73             default => sub {
74             {
75             'metric' => q{Internationales Maßsystem (SI)},
76             'UK' => q{Englisches Maßsystem},
77             'US' => q{Angloamerikanisches Maßsystem},
78              
79             }
80             },
81             );
82              
83             has 'characters' => (
84             is => 'ro',
85             isa => HashRef,
86             init_arg => undef,
87             default => $^V ge v5.18.0
88             ? eval <<'EOT'
89             sub {
90             no warnings 'experimental::regex_sets';
91             return {
92             index => ['A', 'Ä', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'Ö', 'P', 'Q', 'R', 'S', 'T', 'U', 'Ü', 'V', 'W', 'X', 'Y', 'Z'],
93             numbers => qr{[  \- , % ‰ + 0 1 2 3 4 5 6 7 8 9]},
94             };
95             },
96             EOT
97             : sub {
98             return { index => ['A', 'Ä', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'Ö', 'P', 'Q', 'R', 'S', 'T', 'U', 'Ü', 'V', 'W', 'X', 'Y', 'Z'], };
99             },
100 1     1   100 );
  1         2  
  1         99  
101              
102              
103             has 'number_symbols' => (
104             is => 'ro',
105             isa => HashRef,
106             init_arg => undef,
107             default => sub { {
108             'latn' => {
109             'currencyGroup' => q(.),
110             'group' => q( ),
111             },
112             } }
113             );
114              
115             has 'number_currency_formats' => (
116             is => 'ro',
117             isa => HashRef,
118             init_arg => undef,
119             default => sub { {
120             'latn' => {
121             'pattern' => {
122             'default' => {
123             'standard' => {
124             'positive' => '¤ #,##0.00',
125             },
126             },
127             },
128             },
129             } },
130             );
131              
132             has 'calendar_months' => (
133             is => 'ro',
134             isa => HashRef,
135             init_arg => undef,
136             default => sub { {
137             'gregorian' => {
138             'format' => {
139             abbreviated => {
140             nonleap => [
141             'Jän.',
142             'Feb.',
143             'März',
144             'Apr.',
145             'Mai',
146             'Juni',
147             'Juli',
148             'Aug.',
149             'Sep.',
150             'Okt.',
151             'Nov.',
152             'Dez.'
153             ],
154             leap => [
155            
156             ],
157             },
158             wide => {
159             nonleap => [
160             'Jänner',
161             'Februar',
162             'März',
163             'April',
164             'Mai',
165             'Juni',
166             'Juli',
167             'August',
168             'September',
169             'Oktober',
170             'November',
171             'Dezember'
172             ],
173             leap => [
174            
175             ],
176             },
177             },
178             'stand-alone' => {
179             abbreviated => {
180             nonleap => [
181             'Jän',
182             'Feb',
183             'Mär',
184             'Apr',
185             'Mai',
186             'Jun',
187             'Jul',
188             'Aug',
189             'Sep',
190             'Okt',
191             'Nov',
192             'Dez'
193             ],
194             leap => [
195            
196             ],
197             },
198             wide => {
199             nonleap => [
200             'Jänner',
201             'Februar',
202             'März',
203             'April',
204             'Mai',
205             'Juni',
206             'Juli',
207             'August',
208             'September',
209             'Oktober',
210             'November',
211             'Dezember'
212             ],
213             leap => [
214            
215             ],
216             },
217             },
218             },
219             } },
220             );
221              
222             has 'day_period_data' => (
223             is => 'ro',
224             isa => CodeRef,
225             init_arg => undef,
226             default => sub { sub {
227             # Time in hhmm format
228             my ($self, $type, $time, $day_period_type) = @_;
229             $day_period_type //= 'default';
230             SWITCH:
231             for ($type) {
232             if ($_ eq 'gregorian') {
233             if($day_period_type eq 'default') {
234             return 'midnight' if $time == 0;
235             return 'afternoon1' if $time >= 1200
236             && $time < 1300;
237             return 'afternoon2' if $time >= 1300
238             && $time < 1800;
239             return 'evening1' if $time >= 1800
240             && $time < 2400;
241             return 'morning1' if $time >= 500
242             && $time < 1000;
243             return 'morning2' if $time >= 1000
244             && $time < 1200;
245             return 'night1' if $time >= 0
246             && $time < 500;
247             }
248             if($day_period_type eq 'selection') {
249             return 'afternoon1' if $time >= 1200
250             && $time < 1300;
251             return 'afternoon2' if $time >= 1300
252             && $time < 1800;
253             return 'evening1' if $time >= 1800
254             && $time < 2400;
255             return 'morning1' if $time >= 500
256             && $time < 1000;
257             return 'morning2' if $time >= 1000
258             && $time < 1200;
259             return 'night1' if $time >= 0
260             && $time < 500;
261             }
262             last SWITCH;
263             }
264             }
265             } },
266             );
267              
268             around day_period_data => sub {
269             my ($orig, $self) = @_;
270             return $self->$orig;
271             };
272              
273             has 'day_periods' => (
274             is => 'ro',
275             isa => HashRef,
276             init_arg => undef,
277             default => sub { {
278             'gregorian' => {
279             'stand-alone' => {
280             'narrow' => {
281             'am' => q{vm.},
282             'pm' => q{nm.},
283             },
284             },
285             },
286             } },
287             );
288              
289             has 'eras' => (
290             is => 'ro',
291             isa => HashRef,
292             init_arg => undef,
293             default => sub { {
294             'gregorian' => {
295             },
296             } },
297             );
298              
299             has 'date_formats' => (
300             is => 'ro',
301             isa => HashRef,
302             init_arg => undef,
303             default => sub { {
304             'gregorian' => {
305             },
306             } },
307             );
308              
309             has 'time_formats' => (
310             is => 'ro',
311             isa => HashRef,
312             init_arg => undef,
313             default => sub { {
314             'gregorian' => {
315             },
316             } },
317             );
318              
319             has 'datetime_formats' => (
320             is => 'ro',
321             isa => HashRef,
322             init_arg => undef,
323             default => sub { {
324             'gregorian' => {
325             },
326             } },
327             );
328              
329             has 'datetime_formats_available_formats' => (
330             is => 'ro',
331             isa => HashRef,
332             init_arg => undef,
333             default => sub { {
334             } },
335             );
336              
337             has 'datetime_formats_append_item' => (
338             is => 'ro',
339             isa => HashRef,
340             init_arg => undef,
341             default => sub { {
342             } },
343             );
344              
345             has 'datetime_formats_interval' => (
346             is => 'ro',
347             isa => HashRef,
348             init_arg => undef,
349             default => sub { {
350             } },
351             );
352              
353 1     1   1310 no Moo;
  1         1  
  1         10  
354              
355             1;
356              
357             # vim: tabstop=4