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