line |
true |
false |
branch |
27
|
18 |
463 |
if @_
|
47
|
215 |
10674 |
if @_
|
82
|
459 |
103 |
unless exists $args{'legacy_year'}
|
84
|
362 |
200 |
unless exists $args{'cut_off_year'}
|
90
|
122 |
440 |
if ($args{'base_datetime'})
|
123
|
6 |
129 |
if ($dt < $lower_bound)
|
127
|
6 |
123 |
if ($dt >= $upper_bound)
|
184
|
1 |
3 |
$dt->nanosecond ? :
|
|
1 |
4 |
$dt->nanosecond % 1000000 ? :
|
190
|
2 |
3 |
if ($dt->time_zone->is_utc) { }
|
914
|
11022 |
10011 |
if (ref $p{'self'} and exists $p{'self'}{'legacy_year'}) { }
|
915
|
10022 |
1000 |
if ($p{'self'}{'legacy_year'}) { }
|
919
|
10022 |
0 |
exists $p{'self'}{'cut_off_year'} ? :
|
920
|
4972 |
5050 |
$p{'parsed'}{'year'} > $cutoff ? :
|
932
|
0 |
10011 |
ref $p{'self'} && exists $p{'self'}{'cut_off_year'} ? :
|
933
|
4961 |
5050 |
$p{'parsed'}{'year'} > $cutoff ? :
|
988
|
169 |
255 |
if ref $_[0] and $_[0]{'base_datetime'}
|
1024
|
27 |
39 |
if (length $p{'parsed'}{'time_zone'} == 3)
|
1038
|
2000 |
1980 |
exists $p{'parsed'}{'day_of_week'} ? :
|
1046
|
20 |
3960 |
if ($od < 1) { }
|
1053
|
6 |
3954 |
if ($od > $year_length) { }
|