File Coverage

blib/lib/Locale/CLDR/Locales/De/Latn/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::Latn::At - Package for language German
6              
7             =cut
8              
9             package Locale::CLDR::Locales::De::Latn::At;
10             # This file auto generated from Data\common\main\de_AT.xml
11             # on Fri 17 Jan 12:03:31 pm GMT
12              
13 1     1   1584 use strict;
  1         1  
  1         35  
14 1     1   4 use warnings;
  1         2  
  1         60  
15 1     1   5 use version;
  1         1  
  1         7  
16              
17             our $VERSION = version->declare('v0.46.0');
18              
19 1     1   109 use v5.12.0;
  1         3  
20 1     1   4 use mro 'c3';
  1         1  
  1         8  
21 1     1   48 use utf8;
  1         2  
  1         10  
22 1     1   44 use feature 'unicode_strings';
  1         2  
  1         125  
23 1     1   4 use Types::Standard qw( Str Int HashRef ArrayRef CodeRef RegexpRef );
  1         2  
  1         12  
24 1     1   1742 use Moo;
  1         3  
  1         7  
25              
26             extends('Locale::CLDR::Locales::De::Latn');
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   140 );
  1         2  
  1         149  
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             },
199             },
200             } },
201             );
202              
203             has 'day_period_data' => (
204             is => 'ro',
205             isa => CodeRef,
206             init_arg => undef,
207             default => sub { sub {
208             # Time in hhmm format
209             my ($self, $type, $time, $day_period_type) = @_;
210             $day_period_type //= 'default';
211             SWITCH:
212             for ($type) {
213             if ($_ eq 'gregorian') {
214             if($day_period_type eq 'default') {
215             return 'midnight' if $time == 0;
216             return 'afternoon1' if $time >= 1200
217             && $time < 1300;
218             return 'afternoon2' if $time >= 1300
219             && $time < 1800;
220             return 'evening1' if $time >= 1800
221             && $time < 2400;
222             return 'morning1' if $time >= 500
223             && $time < 1000;
224             return 'morning2' if $time >= 1000
225             && $time < 1200;
226             return 'night1' if $time >= 0
227             && $time < 500;
228             }
229             if($day_period_type eq 'selection') {
230             return 'afternoon1' if $time >= 1200
231             && $time < 1300;
232             return 'afternoon2' if $time >= 1300
233             && $time < 1800;
234             return 'evening1' if $time >= 1800
235             && $time < 2400;
236             return 'morning1' if $time >= 500
237             && $time < 1000;
238             return 'morning2' if $time >= 1000
239             && $time < 1200;
240             return 'night1' if $time >= 0
241             && $time < 500;
242             }
243             last SWITCH;
244             }
245             }
246             } },
247             );
248              
249             around day_period_data => sub {
250             my ($orig, $self) = @_;
251             return $self->$orig;
252             };
253              
254             has 'day_periods' => (
255             is => 'ro',
256             isa => HashRef,
257             init_arg => undef,
258             default => sub { {
259             'gregorian' => {
260             'stand-alone' => {
261             'narrow' => {
262             'am' => q{vm.},
263             'pm' => q{nm.},
264             },
265             },
266             },
267             } },
268             );
269              
270             has 'eras' => (
271             is => 'ro',
272             isa => HashRef,
273             init_arg => undef,
274             default => sub { {
275             'gregorian' => {
276             },
277             } },
278             );
279              
280             has 'date_formats' => (
281             is => 'ro',
282             isa => HashRef,
283             init_arg => undef,
284             default => sub { {
285             'gregorian' => {
286             },
287             } },
288             );
289              
290             has 'time_formats' => (
291             is => 'ro',
292             isa => HashRef,
293             init_arg => undef,
294             default => sub { {
295             'gregorian' => {
296             },
297             } },
298             );
299              
300             has 'datetime_formats' => (
301             is => 'ro',
302             isa => HashRef,
303             init_arg => undef,
304             default => sub { {
305             'gregorian' => {
306             },
307             } },
308             );
309              
310             has 'datetime_formats_available_formats' => (
311             is => 'ro',
312             isa => HashRef,
313             init_arg => undef,
314             default => sub { {
315             } },
316             );
317              
318             has 'datetime_formats_append_item' => (
319             is => 'ro',
320             isa => HashRef,
321             init_arg => undef,
322             default => sub { {
323             } },
324             );
325              
326             has 'datetime_formats_interval' => (
327             is => 'ro',
328             isa => HashRef,
329             init_arg => undef,
330             default => sub { {
331             } },
332             );
333              
334 1     1   1587 no Moo;
  1         1  
  1         6  
335              
336             1;
337              
338             # vim: tabstop=4