| line |
true |
false |
branch |
|
30
|
2 |
6 |
if (ref $_[0]) { }
|
|
44
|
2 |
7 |
if $id =~ /[\@=]/
|
|
49
|
0 |
7 |
if not delete $p{'replace'} and exists $DataForCode{$id}
|
|
52
|
7 |
0 |
unless exists $p{'native_language'}
|
|
57
|
19 |
9 |
if exists $p{"en_$p"}
|
|
58
|
7 |
21 |
if exists $p{"native_$p"}
|
|
71
|
7 |
0 |
if defined exists $p{'class'}
|
|
79
|
0 |
1 |
ref $_[0] ? :
|
|
83
|
0 |
1 |
if $code =~ /[\@=]/
|
|
97
|
0 |
5 |
ref $_[0] ? :
|
|
102
|
1 |
4 |
if $alias eq $code
|
|
112
|
1 |
3 |
if $seen{$copy}
|
|
139
|
2 |
0 |
wantarray ? :
|
|
145
|
1 |
0 |
wantarray ? :
|
|
151
|
0 |
0 |
wantarray ? :
|
|
211
|
10 |
1057 |
if exists $LoadCache{$code}
|
|
218
|
8 |
1049 |
if exists $DateTimeLanguageAliases{$code}
|
|
219
|
4 |
1053 |
if exists $POSIXAliases{$code}
|
|
221
|
4 |
1053 |
if exists $DateTime::Locale::Data::ISO639Aliases{$code}
|
|
223
|
1038 |
19 |
if (exists $DateTime::Locale::Data::Codes{$code})
|
|
227
|
4 |
15 |
if (exists $DateTime::Locale::Data::Names{$code})
|
|
232
|
1 |
14 |
if (exists $DateTime::Locale::Data::NativeNames{$code})
|
|
237
|
7 |
7 |
if (my $locale = $class->_registered_locale_for($code))
|
|
241
|
5 |
2 |
if (my $guessed = $class->_guess_code($code))
|
|
257
|
1 |
6 |
if ($codes{'script'})
|
|
262
|
1 |
0 |
if defined $codes{'territory'}
|
|
268
|
0 |
7 |
if ($codes{'variant'})
|
|
273
|
4 |
3 |
if ($codes{'territory'})
|
|
282
|
5 |
2 |
if exists $DateTime::Locale::Data::Codes{$code} or exists $DateTime::Locale::Data::Names{$code}
|
|
290
|
0 |
1048 |
unless my $data = DateTime::Locale::Data::locale_data($code)
|
|
302
|
2 |
12 |
if ($Class{$code})
|
|
307
|
5 |
7 |
if ($DataForCode{$code})
|
|
311
|
0 |
7 |
if ($NameToCode{$code})
|
|
316
|
0 |
7 |
if ($NativeNameToCode{$code})
|
|
340
|
0 |
7 |
unless ($real_class->can("new"))
|
|
343
|
0 |
0 |
if $@
|
|
352
|
1 |
6 |
if ($locale->can("cldr_version"))
|
|
355
|
1 |
0 |
if ($object_version ne $DateTime::Locale::Data::CLDRVersion)
|