| line |
true |
false |
branch |
|
48
|
0 |
437 |
if exists $opts->{'debug'}
|
|
50
|
0 |
437 |
unless defined $this and length $this
|
|
53
|
1 |
436 |
(builtin::reftype($this) // '') eq 'ARRAY' ? :
|
|
68
|
0 |
437 |
if not defined $ref and $cldr->error
|
|
69
|
437 |
0 |
if ($ref)
|
|
71
|
0 |
437 |
if (builtin::blessed($loc) and ref $loc eq 'Locale::Intl') { }
|
|
85
|
0 |
437 |
unless defined $locale
|
|
96
|
7 |
430 |
if (not scalar keys %$check) { }
|
|
149
|
0 |
1640 |
unless (exists $valid_options{$key})
|
|
157
|
1350 |
290 |
if (ref $valid_options{$key} eq 'ARRAY') { }
|
|
|
290 |
0 |
elsif (ref $valid_options{$key} eq 'Regexp') { }
|
|
159
|
0 |
1350 |
unless (scalar grep({($_ // "") eq ($value // "");} @{$valid_options{$key};}))
|
|
161
|
0 |
0 |
if ($key eq 'fractionalSecondDigits') { }
|
|
179
|
0 |
290 |
unless ($value =~ /^$valid_options{$key}$/)
|
|
192
|
0 |
2 |
if ($has_style and $opts->{'weekday'} || $opts->{'era'} || $opts->{'year'} || $opts->{'month'} || $opts->{'day'} || $opts->{'hour'} || $opts->{'minute'} || $opts->{'second'} || $opts->{'fractionalSecondDigits'} || $opts->{'timeZoneName'})
|
|
225
|
287 |
150 |
unless ($calendar)
|
|
227
|
3 |
284 |
if ($calendar = $locale->calendar) { }
|
|
236
|
3 |
434 |
if $calendar eq "gregory"
|
|
237
|
0 |
437 |
if (lc $calendar ne "gregory" and lc $calendar ne "gregorian")
|
|
240
|
0 |
0 |
if warnings::enabled()
|
|
246
|
159 |
278 |
if (length($time_style // "") or $opts->{'hour'})
|
|
264
|
54 |
105 |
if (defined $h12) { }
|
|
|
48 |
57 |
elsif ($hc) { }
|
|
|
0 |
57 |
elsif ($hc = $locale->hc) { }
|
|
270
|
0 |
33 |
$pref_hour_cycle eq 'H' || $pref_hour_cycle eq 'K' ? :
|
|
|
21 |
0 |
$pref_hour_cycle eq 'h' || $pref_hour_cycle eq 'k' ? :
|
|
|
33 |
21 |
$h12 ? :
|
|
278
|
30 |
18 |
$hc eq 'h12' || $hc eq 'h11' ? :
|
|
283
|
0 |
0 |
$hc eq 'h12' || $hc eq 'h11' ? :
|
|
288
|
55 |
2 |
if ($pref_hour_cycle eq 'h') { }
|
|
|
2 |
0 |
elsif ($pref_hour_cycle eq 'H') { }
|
|
|
0 |
0 |
elsif ($pref_hour_cycle eq 'k') { }
|
|
|
0 |
0 |
elsif ($pref_hour_cycle eq 'K') { }
|
|
311
|
144 |
15 |
if ($opts->{'hour'} and $opts->{'hour'} ne "2-digit")
|
|
313
|
40 |
104 |
$resolved->{'hourCycle'} eq 'h23' || $resolved->{'hourCycle'} eq 'h24' ? :
|
|
321
|
0 |
437 |
unless $ns_default_def->{'type'} eq "numeric"
|
|
323
|
0 |
437 |
if ($num_sys)
|
|
326
|
0 |
0 |
if not defined $num_sys_def and $cldr->error
|
|
328
|
0 |
0 |
unless ($num_sys_def)
|
|
330
|
0 |
0 |
if warnings::enabled()
|
|
336
|
0 |
0 |
if (not $num_sys eq 'latn' || scalar grep((($systems->{$_} // '') eq $num_sys), ('number_system', 'native')) and $num_sys_def->{'type'} ne "numeric")
|
|
338
|
0 |
0 |
if warnings::enabled()
|
|
342
|
3 |
434 |
if (not defined $num_sys and my $locale_num_sys = $locale->number)
|
|
345
|
0 |
3 |
if not defined $num_sys_def and $cldr->error
|
|
347
|
0 |
3 |
if ($locale_num_sys eq 'latn' or scalar grep((($systems->{$_} // '') eq $locale_num_sys), ('number_system', 'native')) and $num_sys_def->{'type'} ne 'numeric') { }
|
|
357
|
3 |
0 |
if warnings::enabled()
|
|
361
|
437 |
0 |
unless (length($num_sys // ""))
|
|
368
|
141 |
296 |
if (length($tz // '')) { }
|
|
|
2 |
294 |
elsif (my $bcp47_tz = $locale->timezone) { }
|
|
373
|
0 |
141 |
if not defined $ref and $cldr->error
|
|
374
|
0 |
141 |
unless ($ref)
|
|
389
|
0 |
2 |
if not defined $all and $cldr->error
|
|
390
|
2 |
0 |
if ($all and scalar @$all and $all->[0]{'timezone'}) { }
|
|
402
|
294 |
143 |
unless (length($tz // ""))
|
|
409
|
294 |
0 |
if ($@) { }
|
|
421
|
44 |
393 |
if (length($tzNameOpt // ""))
|
|
428
|
93 |
344 |
if (my $era = $opts->{'era'})
|
|
446
|
0 |
93 |
if not defined $all and $cldr->error
|
|
447
|
93 |
0 |
if ($all)
|
|
454
|
93 |
0 |
if (exists $supported->{$era}) { }
|
|
|
0 |
0 |
elsif ($era eq 'short' and exists $supported->{'abbreviated'}) { }
|
|
465
|
0 |
93 |
unless (defined $width)
|
|
470
|
0 |
0 |
exists $supported->{'short'} ? :
|
|
|
0 |
0 |
exists $supported->{'long'} ? :
|
|
487
|
501 |
373 |
unless length($val // "")
|
|
489
|
112 |
147 |
if $prop eq "month" and $val eq '2-digit' || $val eq 'numeric'
|
|
508
|
0 |
262 |
if not defined $all and $cldr->error
|
|
509
|
261 |
1 |
if ($all and scalar @$all)
|
|
516
|
261 |
0 |
if (exists $supported->{$val}) { }
|
|
|
0 |
0 |
elsif ($val eq 'short' and exists $supported->{'abbreviated'}) { }
|
|
527
|
0 |
261 |
unless (defined $width)
|
|
532
|
0 |
0 |
exists $supported->{'short'} ? :
|
|
|
0 |
0 |
exists $supported->{'long'} ? :
|
|
539
|
126 |
311 |
if ($opts->{'minute'})
|
|
544
|
41 |
396 |
if ($opts->{'second'})
|
|
553
|
297 |
140 |
unless ($pattern)
|
|
566
|
2 |
295 |
if ($dateStyle or $timeStyle) { }
|
|
572
|
1 |
1 |
if ($dateStyle)
|
|
577
|
0 |
1 |
if not defined $date_pattern and $unicode->error
|
|
578
|
0 |
1 |
unless length($date_pattern // "")
|
|
580
|
1 |
1 |
if ($timeStyle)
|
|
585
|
0 |
1 |
if not defined $date_pattern and $unicode->error
|
|
586
|
0 |
1 |
unless length($time_pattern // "")
|
|
589
|
0 |
2 |
if (defined $date_pattern and defined $time_pattern) { }
|
|
596
|
0 |
0 |
if not defined $date_pattern and $unicode->error
|
|
597
|
0 |
0 |
unless length($pattern // "")
|
|
622
|
297 |
0 |
if defined $pattern
|
|
631
|
0 |
0 |
if (@_)
|
|
634
|
0 |
0 |
if (@_ == 1 and defined $_[0] and ref $_[0] eq 'HASH' and exists $_[0]{'message'}) { }
|
|
643
|
0 |
0 |
ref $_ eq 'CODE' ? :
|
|
645
|
0 |
0 |
unless exists $def->{'skip_frames'}
|
|
647
|
0 |
0 |
if ($self->fatal) { }
|
|
653
|
0 |
0 |
if warnings::enabled()
|
|
654
|
0 |
0 |
if (Want::want('ARRAY')) { }
|
|
|
0 |
0 |
elsif (Want::want('OBJECT')) { }
|
|
665
|
0 |
0 |
ref $self ? :
|
|
673
|
0 |
46 |
unless ref $self
|
|
675
|
0 |
46 |
if (not defined $this && length($this // '')) { }
|
|
|
0 |
46 |
elsif (not builtin::blessed($this) && $this->isa('DateTime')) { }
|
|
689
|
46 |
0 |
if ($opts->{'timeZone'}) { }
|
|
|
0 |
0 |
elsif ($tz eq 'floating') { }
|
|
722
|
0 |
46 |
unless (scalar @$parts)
|
|
735
|
0 |
150 |
if (not builtin::blessed($this1) && $this1->isa('DateTime')) { }
|
|
|
0 |
150 |
elsif (not builtin::blessed($this2) && $this2->isa('DateTime')) { }
|
|
760
|
10 |
140 |
$opts->{'dayPeriod'} ? :
|
|
761
|
0 |
150 |
if not defined $diff and $unicode->error
|
|
763
|
0 |
150 |
unless ($diff)
|
|
772
|
0 |
150 |
unless (scalar @$parts)
|
|
785
|
0 |
225 |
if (not builtin::blessed($this1) && $this1->isa('DateTime')) { }
|
|
|
0 |
225 |
elsif (not builtin::blessed($this2) && $this2->isa('DateTime')) { }
|
|
807
|
150 |
75 |
if ($args->{'datetime1'} and $args->{'datetime2'}) { }
|
|
825
|
150 |
75 |
if (exists $args->{'diff'} and defined $args->{'diff'}) { }
|
|
831
|
5 |
70 |
$opts->{'dayPeriod'} ? :
|
|
832
|
0 |
75 |
if not defined $diff and $unicode->error
|
|
835
|
0 |
225 |
unless ($diff)
|
|
840
|
39 |
0 |
if ($diff eq 'h' || $diff eq 'H' and exists $opts->{'hourCycle'} and $opts->{'hourCycle'})
|
|
844
|
12 |
27 |
$opts->{'hourCycle'} eq 'h23' || $opts->{'hourCycle'} eq 'h24' ? :
|
|
850
|
216 |
9 |
unless ($def)
|
|
854
|
0 |
216 |
unless (defined $all and scalar keys %$all)
|
|
862
|
0 |
2667 |
unless (length($pat // ""))
|
|
864
|
0 |
0 |
if warnings::enabled()
|
|
869
|
2553 |
114 |
if ($pos_start != -1)
|
|
892
|
18 |
198 |
if ($score_object->need_adjustment) { }
|
|
950
|
0 |
92 |
unless ref $self
|
|
952
|
0 |
92 |
if (not defined $this && length($this // '')) { }
|
|
|
0 |
92 |
elsif (not builtin::blessed($this) && $this->isa('DateTime')) { }
|
|
964
|
92 |
0 |
if scalar @_ == 1 and ref($_[0] // "") eq "HASH" or not @_ % 2
|
|
971
|
46 |
46 |
if ($args->{'datetime'}) { }
|
|
983
|
92 |
0 |
if ($opts->{'timeZone'}) { }
|
|
|
0 |
0 |
elsif ($tz eq 'floating') { }
|
|
1022
|
0 |
0 |
if (scalar @_)
|
|
1026
|
0 |
0 |
if (scalar @_ == 1 and ref $_[0] eq 'HASH') { }
|
|
1032
|
0 |
0 |
if (scalar @_ > 1 and ref $_[-1] eq "HASH")
|
|
1039
|
0 |
0 |
if not defined $err and exists $opts->{'error'} and defined $opts->{'error'} and length $opts->{'error'}
|
|
1041
|
0 |
0 |
if exists $opts->{'class'} and defined $opts->{'class'} and length $opts->{'class'}
|
|
1042
|
0 |
0 |
if exists $opts->{'code'} and defined $opts->{'code'} and length $opts->{'code'}
|
|
1047
|
0 |
0 |
if (not defined $err and !scalar(@_) || defined $class) { }
|
|
|
0 |
0 |
elsif (defined $err and builtin::blessed($err) and scalar @_ == 1 || scalar @_ == 2 && defined $class) { }
|
|
1050
|
0 |
0 |
length ${$pack . '::ERROR';} ? :
|
|
|
0 |
0 |
ref $self ? :
|
|
1051
|
0 |
0 |
if (not defined $error) { }
|
|
1057
|
0 |
0 |
defined $class ? :
|
|
1058
|
0 |
0 |
if defined $code
|
|
1067
|
0 |
0 |
defined $class ? :
|
|
1068
|
0 |
0 |
if defined $code and $self->{'error'}->can("code")
|
|
1070
|
0 |
0 |
if ($self->{'fatal'} or defined ${"${class}::FATAL_EXCEPTIONS";} and ${"${class}::FATAL_EXCEPTIONS";})
|
|
1081
|
0 |
0 |
if (Want::want("OBJECT"))
|
|
1100
|
0 |
1 |
if (not defined $locales && length $locales or (builtin::reftype($locales) // "") eq "ARRAY" and not scalar @$locales)
|
|
1104
|
1 |
0 |
(builtin::reftype($locales) // '') eq 'ARRAY' ? :
|
|
1117
|
3 |
0 |
if ($ref and ref $ref eq "HASH" and scalar keys %$ref)
|
|
1136
|
0 |
81 |
if (ref $pattern and not overload::Method($pattern, '""')) { }
|
|
|
0 |
81 |
elsif (ref $opts ne 'HASH') { }
|
|
1147
|
0 |
81 |
if (not ref $request_object or ref $request_object and not $request_object->isa('DateTime::Format::Intl::Skeleton')) { }
|
|
|
0 |
81 |
elsif (defined $pattern_object and !ref($pattern_object) || ref $pattern_object && !$pattern_object->isa('DateTime::Format::Intl::Skeleton')) { }
|
|
1198
|
0 |
43 |
unless (exists $opts->{'hourCycle'} and defined $opts->{'hourCycle'})
|
|
1201
|
0 |
0 |
if ($pref eq 'h') { }
|
|
|
0 |
0 |
elsif ($pref eq 'H') { }
|
|
|
0 |
0 |
elsif ($pref eq 'k') { }
|
|
1214
|
0 |
43 |
if ($opts->{'hourCycle'} eq 'h11') { }
|
|
|
30 |
13 |
elsif ($opts->{'hourCycle'} eq 'h12' or $opts->{'hour12'}) { }
|
|
|
1 |
12 |
elsif ($opts->{'hourCycle'} eq 'h23') { }
|
|
|
12 |
0 |
elsif ($opts->{'hourCycle'} eq 'h24' or exists $opts->{'hour12'} and not $opts->{'hour12'}) { }
|
|
1216
|
0 |
0 |
$opts->{'hour'} eq '2-digit' ? :
|
|
1220
|
14 |
16 |
$opts->{'hour'} eq '2-digit' ? :
|
|
1224
|
1 |
0 |
$opts->{'hour'} eq '2-digit' ? :
|
|
1228
|
12 |
0 |
$opts->{'hour'} eq '2-digit' ? :
|
|
1236
|
12 |
0 |
$opts->{'second'} eq '2-digit' ? :
|
|
1237
|
0 |
12 |
if ($opts->{'second'} and $opts->{'fractionalSecondDigits'}) { }
|
|
1240
|
0 |
0 |
scalar grep(/S/, @parts) ? :
|
|
1241
|
0 |
0 |
if ($has_fractional_seconds) { }
|
|
1263
|
0 |
0 |
if $opts->{'fractionalSecondDigits'} == 0
|
|
1273
|
10 |
0 |
if ($token eq 'E' or $token eq 'c' || $token eq 'e' and $length >= 3) { }
|
|
|
0 |
0 |
elsif ($token eq 'c' || $token eq 'e' and $length >= 3) { }
|
|
1294
|
624 |
0 |
if (exists $component_to_match->{$option}) { }
|
|
1297
|
436 |
188 |
unless defined $val
|
|
1298
|
132 |
56 |
if (ref $val) { }
|
|
1300
|
132 |
0 |
if (ref $val eq 'CODE') { }
|
|
|
0 |
0 |
elsif (ref $val eq 'HASH') { }
|
|
1306
|
98 |
34 |
if (ref $rv eq 'ARRAY') { }
|
|
|
34 |
0 |
elsif (ref $rv eq 'HASH') { }
|
|
1310
|
97 |
1 |
if (ref $rv->[0] eq 'ARRAY') { }
|
|
|
0 |
1 |
elsif (ref $rv->[0]) { }
|
|
1350
|
38 |
18 |
$opts->{$option} eq '2-digit' ? :
|
|
1370
|
81 |
0 |
if (defined $pattern_object)
|
|
1397
|
3 |
365 |
if (defined $1) { }
|
|
|
218 |
147 |
elsif (defined $2) { }
|
|
|
147 |
0 |
elsif (defined $4) { }
|
|
1405
|
188 |
30 |
if (exists $component_precision->{$component}) { }
|
|
1414
|
0 |
188 |
if ($component eq 'L' || $component eq 'M' and length $token <= 2 and $opts->{'month'} ne 'numeric' and $opts->{'month'} ne '2-digit') { }
|
|
|
40 |
148 |
elsif (exists $pattern_len->{$component} and exists $request_len->{$component} and $pattern_len->{$component} == $request_len->{$component}) { }
|
|
|
10 |
138 |
elsif (ref $this eq 'CODE') { }
|
|
|
0 |
138 |
elsif (ref $this) { }
|
|
1431
|
10 |
0 |
defined $rv ? :
|
|
1470
|
0 |
3 |
if (ref $pattern and not overload::Method($pattern, '""')) { }
|
|
|
0 |
3 |
elsif (ref $missing ne 'ARRAY') { }
|
|
1538
|
0 |
3 |
if not defined $ref and $cldr->error
|
|
1539
|
3 |
0 |
if ($ref)
|
|
1563
|
0 |
0 |
if not defined $ref and $cldr->error
|
|
1564
|
0 |
0 |
if ($ref)
|
|
1576
|
27 |
3 |
unless exists $missing_hash->{$comp}
|
|
1577
|
0 |
3 |
unless (exists $map->{$comp})
|
|
1583
|
0 |
3 |
if (not defined $format) { }
|
|
|
0 |
3 |
elsif (not length $format) { }
|
|
1593
|
0 |
3 |
if (index($format, "{2}") != -1)
|
|
1596
|
0 |
0 |
if (not defined $term) { }
|
|
|
0 |
0 |
elsif (not length $term) { }
|
|
1616
|
551 |
1 |
if (ref $self) { }
|
|
1633
|
0 |
662 |
if ($current_time - $DateTime::Format::Intl::LAST_CACHE_CLEAR > 86400 or keys %$DateTime::Format::Intl::CACHE > $DateTime::Format::Intl::MAX_CACHE_SIZE)
|
|
1649
|
0 |
542 |
unless ($opts->{'numberingSystem'} eq "latn")
|
|
1719
|
1473 |
0 |
if (exists $map->{$component}) { }
|
|
1721
|
0 |
1473 |
unless exists $comp_map->{$component}
|
|
1757
|
0 |
2689 |
if (defined $1) { }
|
|
|
1473 |
1216 |
elsif (defined $2) { }
|
|
|
1216 |
0 |
elsif (defined $4) { }
|
|
1778
|
0 |
542 |
if ($@)
|
|
1789
|
436 |
23609 |
if (scalar @_ == 1 and defined $_[0] and (ref $_[0] || '') eq 'HASH') { }
|
|
|
23609 |
0 |
elsif (not scalar(@_) % 2) { }
|
|
1827
|
0 |
598 |
if not defined $all and $cldr->error
|
|
1828
|
591 |
7 |
if ($all and scalar @$all)
|
|
1832
|
16181 |
15653 |
if exists $$patterns{$_->{'format_id'}}
|
|
1862
|
432 |
0 |
if ($all and scalar @$all)
|
|
1866
|
2667 |
2667 |
if exists $$patterns{$_->{'format_id'}}
|
|
1880
|
149 |
499 |
if (exists $DateTime::Format::Intl::CACHE->{$locale} and ref $DateTime::Format::Intl::CACHE->{$locale} eq "HASH" and exists $DateTime::Format::Intl::CACHE->{$locale}{$key})
|
|
1895
|
0 |
20 |
if $type ne "atTime" and $type ne "standard"
|
|
1910
|
0 |
20 |
if not defined $ref and $cldr->error
|
|
1911
|
20 |
0 |
if ($ref and $ref->{'format_pattern'})
|
|
1943
|
7 |
7 |
if (exists $DateTime::Format::Intl::BROWSER_DEFAULTS->{$loc})
|
|
1949
|
0 |
7 |
unless defined $defaults
|
|
2106
|
4 |
554 |
if (exists $locale_preferences{$loc})
|
|
2331
|
1565 |
4496 |
if (exists $opts->{$option}) { }
|
|
|
0 |
4496 |
elsif (defined $diff and scalar grep(($_ eq $diff), @{$$def{'pattern_components'};})) { }
|
|
2335
|
0 |
1565 |
unless exists $$len{$opts->{$option}}
|
|
2336
|
182 |
1383 |
if (ref $$len{$opts->{$option}} eq 'HASH') { }
|
|
2352
|
194 |
1371 |
if (exists $def->{'alias'}) { }
|
|
2356
|
0 |
388 |
if ref $def->{'alias'}{$k} ne "ARRAY"
|
|
2378
|
0 |
0 |
if (ref $len->{$comp} eq 'HASH') { }
|
|
2383
|
0 |
0 |
ref $len->{$comp}{$c} eq 'ARRAY' ? :
|
|
2392
|
0 |
0 |
ref $len->{$comp} eq 'ARRAY' ? :
|
|
2397
|
0 |
0 |
if (exists $def->{'alias'}) { }
|
|
2401
|
0 |
0 |
if ref $def->{'alias'}{$k} ne "ARRAY"
|
|
2422
|
120 |
94 |
if (exists $opts->{'hour12'} and $opts->{'hour12'} and not exists $opts->{'dayPeriod'})
|
|
2431
|
214 |
337 |
if (exists $opts->{'hour12'})
|
|
2433
|
162 |
52 |
if ($opts->{'hour12'}) { }
|
|
2511
|
2 |
1 |
$x > $y ? :
|
|
2582
|
2 |
255 |
$opts->{'year'} eq '2-digit' ? :
|
|
|
257 |
294 |
exists $opts->{'year'} ? :
|
|
2586
|
330 |
221 |
exists $opts->{'month'} ? :
|
|
2590
|
2 |
239 |
$opts->{'day'} eq '2-digit' ? :
|
|
|
241 |
310 |
exists $opts->{'day'} ? :
|
|
2595
|
141 |
410 |
exists $opts->{'weekday'} ? :
|
|
2601
|
52 |
499 |
exists $opts->{'hourCycle'} && defined $opts->{'hourCycle'} && ($opts->{'hourCycle'} eq 'h23' || $opts->{'hourCycle'} eq 'h24') ? :
|
|
2602
|
80 |
114 |
$opts->{'hour'} eq '2-digit' ? :
|
|
|
194 |
357 |
exists $opts->{'hour'} ? :
|
|
2606
|
150 |
0 |
$opts->{'minute'} eq '2-digit' ? :
|
|
|
150 |
401 |
exists $opts->{'minute'} ? :
|
|
2610
|
43 |
0 |
$opts->{'second'} eq '2-digit' ? :
|
|
|
43 |
508 |
exists $opts->{'second'} ? :
|
|
2614
|
115 |
436 |
exists $opts->{'era'} ? :
|
|
2618
|
42 |
509 |
exists $opts->{'dayPeriod'} ? :
|
|
2623
|
52 |
499 |
exists $opts->{'timeZoneName'} ? :
|
|
2672
|
5510 |
0 |
ref $option_to_skeleton->{$option} ? :
|
|
2673
|
1565 |
3945 |
if (exists $opts->{$option} and length($opts->{$option} // "") or defined $diff and $value eq $diff)
|
|
2683
|
1084 |
481 |
if (exists $date_elements->{$option}) { }
|
|
|
481 |
0 |
elsif (exists $time_elements->{$option}) { }
|
|
2693
|
0 |
0 |
if warnings::enabled()
|
|
2697
|
0 |
551 |
wantarray ? :
|
|
2756
|
84857 |
51964 |
if (exists $format_to_skeleton->{$component})
|
|
2770
|
0 |
20460 |
unless length($pattern // "")
|
|
2832
|
19514 |
37875 |
if (exists $pattern_components->{$requested_component}) { }
|
|
|
810 |
37065 |
elsif (my $found_alias = [grep(exists $pattern_components->{$_}, @{[] unless $components_alias->{$requested_component};})]->[0]) { }
|
|
2837
|
0 |
37875 |
unless $components_alias->{$requested_component}
|
|
2848
|
20324 |
37065 |
exists $pattern_components->{$alias} ? :
|
|
2850
|
20324 |
37065 |
if ($exists) { }
|
|
2857
|
9880 |
10444 |
if (ref $expected_length eq 'ARRAY') { }
|
|
2859
|
8592 |
1288 |
if (scalar grep({$pattern_components->{$alias}{'len'} == $_;} @$expected_length)) { }
|
|
2868
|
0 |
1288 |
$expected_length->[0] > $pattern_components->{$alias}{'len'} ? :
|
|
2876
|
7476 |
2968 |
if ($pattern_components->{$alias}{'len'} == $expected_length) { }
|
|
2885
|
2708 |
260 |
$expected_length > $pattern_components->{$alias}{'len'} ? :
|
|
2907
|
3506 |
55519 |
unless (exists $components_weight->{$component})
|
|
2916
|
795 |
54724 |
if (not exists $components_length->{$component} || exists $skeleton_components->{$component}) { }
|
|
|
33311 |
21413 |
elsif (not exists $components_length->{$component}) { }
|
|
2928
|
210 |
33101 |
if (exists $opts->{'hourCycle'} and $opts->{'hourCycle'} eq 'h23' || $opts->{'hourCycle'} eq 'h24' and $component eq 'a' || $component eq 'b' || $component eq 'B') { }
|
|
|
0 |
33101 |
elsif ($component eq 'S' and exists $opts->{'second'}) { }
|
|
2954
|
496 |
19944 |
if ($perfect_score == scalar(@$requested_tokens) * $perfect_component_score)
|
|
2960
|
8736 |
11704 |
if (exists $opts->{'hourCycle'})
|
|
2962
|
2049 |
6687 |
if ($opts->{'hourCycle'} eq 'h12' and index($pattern_skeleton, 'h') != -1) { }
|
|
|
324 |
11223 |
elsif ($opts->{'hourCycle'} eq 'h24' and index($pattern_skeleton, 'H') != -1) { }
|
|
3008
|
498 |
11101 |
if ($i <= $#sorted_available_skeletons and length $sorted_available_skeletons[$i] >= $requested_skeleton_len)
|
|
3012
|
445 |
53 |
if $i > 0
|
|
3018
|
216 |
335 |
defined $diff ? :
|
|
3022
|
0 |
551 |
unless defined $components_len
|
|
3064
|
1029 |
19411 |
if ($score > $best_score)
|
|
3074
|
496 |
19944 |
if ($score > $perfect_component_score)
|
|
3084
|
2 |
549 |
if ($best_score < $perfect_component_score and scalar @$request_tokens == 1 and not exists $$available_patterns{$request_tokens->[0]{'token'}} and not exists $$available_patterns{$request_tokens->[0]{'component'}}) { }
|
|
|
20 |
529 |
elsif ($best_score >= 0 && scalar @{$best_score_object->missing // [];} || $best_score < 0 and scalar @{$request_object->date_components // [];} and scalar @{$request_object->time_components // [];} and not $diff and not $args->{'subprocess'}) { }
|
|
3090
|
0 |
2 |
ref $$components_len{$request_tokens->[0]{'component'}} eq 'ARRAY' ? :
|
|
3160
|
6 |
14 |
if (exists $components_len->{'M'} and $components_len->{'M'} == 4 and exists $components_len->{'E'}) { }
|
|
|
4 |
10 |
elsif (exists $components_len->{'M'} and $components_len->{'M'} == 4) { }
|
|
|
4 |
6 |
elsif (exists $components_len->{'M'} and $components_len->{'M'} == 3) { }
|
|
3187
|
0 |
20 |
unless defined $datetime_format
|
|
3212
|
3 |
526 |
if ($has_missing_components)
|
|
3220
|
0 |
3 |
unless defined $pattern
|
|
3227
|
81 |
448 |
if (not $diff and $best_score_object->need_adjustment)
|
|
3239
|
0 |
529 |
unless $best_pattern
|
|
3247
|
14 |
499 |
unless exists $DateTime::Format::Intl::CACHE->{$locale}
|
|
3255
|
0 |
1109 |
if @_
|
|
4381
|
0 |
0 |
if (scalar @_ == 1) { }
|
|
4383
|
0 |
0 |
if ((ref $_[0] || '') eq 'HASH') { }
|
|
|
0 |
0 |
elsif (ref $_[0] and $_[0]->isa('DateTime::Format::Intl::Exception')) { }
|
|
4386
|
0 |
0 |
if ($args->{'skip_frames'})
|
|
4394
|
0 |
0 |
if exists $args->{$k}
|
|
4412
|
0 |
0 |
ref $_ eq 'CODE' ? :
|
|
4423
|
0 |
0 |
if $self->{'_cache_value'} and not length $self->{'_reset'}
|
|
4452
|
0 |
0 |
if (defined $file and defined $line)
|
|
4465
|
0 |
0 |
if (not length $self->{'_reset'} and scalar @_)
|
|
4475
|
0 |
0 |
unless ref $self
|
|
4485
|
0 |
0 |
if (@_) { }
|
|
4506
|
0 |
0 |
if @_
|
|
4518
|
0 |
0 |
if $serialiser eq "Sereal" and "Sereal::Encoder"->VERSION <= "version"->parse("4.023")
|
|
4532
|
0 |
0 |
scalar @args == 1 && ref $args[0] eq 'ARRAY' ? :
|
|
4533
|
0 |
0 |
defined $ref && ref $ref eq 'ARRAY' && scalar @$ref > 1 ? :
|
|
4534
|
0 |
0 |
ref $ref eq 'ARRAY' ? :
|
|
4537
|
0 |
0 |
if (ref $self) { }
|
|
4574
|
0 |
0 |
@_ ? :
|
|
4582
|
0 |
0 |
if (Want::want("OBJECT"))
|
|
4618
|
0 |
20462 |
if (scalar @args == 1 and defined $args[0] and ref $args[0] eq 'HASH') { }
|
|
|
0 |
20462 |
elsif (scalar(@args) % 2) { }
|
|
4632
|
0 |
102286 |
if ($args[$i] eq "fatal")
|
|
4645
|
0 |
102286 |
if (not defined $meth) { }
|
|
|
0 |
102286 |
elsif (not defined &$meth($self, $val)) { }
|
|
4651
|
0 |
0 |
if (defined $val and $self->error)
|
|
4664
|
0 |
0 |
if (@_)
|
|
4666
|
0 |
0 |
ref $_ eq 'CODE' ? :
|
|
4671
|
0 |
0 |
if ($self->fatal) { }
|
|
4677
|
0 |
0 |
if warnings::enabled("DateTime::Format::Intl")
|
|
4678
|
0 |
0 |
if (Want::want('ARRAY')) { }
|
|
|
0 |
0 |
elsif (Want::want('OBJECT')) { }
|
|
4689
|
0 |
0 |
ref $self ? :
|
|
4703
|
0 |
0 |
if (Want::want("OBJECT"))
|
|
4720
|
102286 |
23040 |
if @_
|
|
4758
|
0 |
21011 |
if (scalar @args == 1 and defined $args[0] and ref $args[0] eq 'HASH') { }
|
|
|
0 |
21011 |
elsif (scalar(@args) % 2) { }
|
|
4773
|
0 |
149281 |
if ($args[$i] eq 'fatal') { }
|
|
|
21011 |
128270 |
elsif ($args[$i] eq 'debug') { }
|
|
4793
|
0 |
64135 |
if (not defined $meth) { }
|
|
|
2204 |
61931 |
elsif (not defined &$meth($self, $val)) { }
|
|
4799
|
0 |
2204 |
if (defined $val and $self->error)
|
|
4808
|
0 |
21011 |
if (scalar @{$self->{'tokens'} // [];} and scalar @{$self->{'components'} // [];} and scalar @{$self->{'date_components'} // [];} and scalar @{$self->{'time_components'} // [];}) { }
|
|
4824
|
0 |
21011 |
if (scalar @{$self->{'skeleton_tokens'} // [];} and scalar @{$self->{'skeleton_components'} // [];} and scalar @{$self->{'skeleton_date_components'} // [];} and scalar @{$self->{'skeleton_time_components'} // [];}) { }
|
|
|
20460 |
551 |
elsif ($self->{'skeleton'}) { }
|
|
4850
|
0 |
0 |
if (@_)
|
|
4852
|
0 |
0 |
ref $_ eq 'CODE' ? :
|
|
4857
|
0 |
0 |
if ($self->fatal) { }
|
|
4863
|
0 |
0 |
if warnings::enabled("DateTime::Format::Intl")
|
|
4864
|
0 |
0 |
if (Want::want('ARRAY')) { }
|
|
|
0 |
0 |
elsif (Want::want('OBJECT')) { }
|
|
4875
|
0 |
0 |
ref $self ? :
|
|
4885
|
0 |
0 |
if (Want::want("OBJECT"))
|
|
4928
|
64223 |
145576 |
if @_
|
|
4983
|
39750 |
116571 |
if (scalar @$tokens and $tokens->[-1]{'component'} eq $component) { }
|
|
4990
|
38565 |
78006 |
if (exists $time_elements->{$component}) { }
|
|
|
70637 |
7369 |
elsif (exists $date_elements->{$component}) { }
|
|
4999
|
75100 |
41471 |
if scalar @$tokens
|
|
5003
|
41471 |
0 |
if scalar @$tokens
|