line |
true |
false |
branch |
27
|
25003 |
9789 |
unless defined $p{$field} |
55
|
38 |
4311 |
if ($p{'nanoseconds'}) { } |
66
|
116 |
4220 |
$$self{'months'} < 0 ? : |
|
13 |
4336 |
defined $p{'end_of_month'} ? : |
84
|
2 |
44 |
if $$self{'nanoseconds'} == 9**9**9 or $$self{'nanoseconds'} == -9**9**9 or $$self{'nanoseconds'} eq sin(9**9**9) |
92
|
13 |
31 |
if $seconds < 0 |
106
|
5 |
3 |
if $_[0]->_has_positive |
107
|
8 |
2 |
if not $_[0]->_has_positive |
109
|
7 |
11 |
grep({$_ > 0;} @{$_[0];}{@all_units}) ? : |
110
|
7 |
6 |
grep({$_ < 0;} @{$_[0];}{@all_units}) ? : |
112
|
6327 |
3 |
if grep {$_ != 0;} @{$_[0];}{@all_units} |
138
|
12 |
52 |
if ($units{'years'}) |
144
|
8 |
56 |
if ($units{'months'}) |
149
|
11 |
53 |
if ($units{'weeks'}) |
155
|
8 |
56 |
if ($units{'days'}) |
160
|
21 |
43 |
if ($units{'hours'}) |
166
|
11 |
53 |
if ($units{'minutes'}) |
171
|
16 |
48 |
if ($units{'seconds'}) |
177
|
8 |
56 |
if ($units{'nanoseconds'}) |
182
|
2 |
62 |
wantarray ? : |
185
|
444 |
132 |
$_[0]{'end_of_month'} eq 'wrap' ? : |
186
|
3 |
0 |
$_[0]{'end_of_month'} eq 'limit' ? : |
187
|
263 |
888 |
$_[0]{'end_of_month'} eq 'preserve' ? : |
216
|
1305 |
5145 |
if $new{$u} |
231
|
8 |
7 |
if $$self{'nanoseconds'} |
262
|
1 |
2 |
if $$self{'nanoseconds'} |
281
|
0 |
1 |
if $rev |
283
|
0 |
1 |
if (blessed $d2 and $d2->isa('DateTimeX::Lite')) |
297
|
0 |
6 |
if $rev |
299
|
0 |
6 |
if blessed $d2 and $d2->isa('DateTimeX::Lite') |