| line |
true |
false |
branch |
|
20
|
1 |
1 |
if ('DR::DateTime' eq ref $cv) |
|
28
|
1 |
1 |
if ('DR::DateTime' eq ref $cv) |
|
32
|
0 |
1 |
unless $pct |
|
40
|
0 |
2 |
if ('DR::DateTime' eq ref $cv) |
|
57
|
2 |
2 |
if ($flip) { } |
|
58
|
0 |
2 |
if ('DR::DateTime' eq ref $cv) |
|
63
|
1 |
1 |
if ('DR::DateTime' eq ref $cv) |
|
76
|
39 |
9 |
if (defined $tz) |
|
78
|
0 |
39 |
unless defined $2 |
|
86
|
2 |
46 |
if defined $DR::DateTime::Defaults::TZFORCE |
|
94
|
0 |
35 |
unless defined $str |
|
99
|
1 |
34 |
if (/^\d+$/) |
|
102
|
28 |
6 |
if (/^(\d{4})-(\d{2})-(\d{2})(?:\s+|T)(\d{2}):(\d{2}):(\d{2})(\.\d+)?\s*(\S+)?$/) |
|
108
|
2 |
4 |
if (/^(\d{4})-(\d{2})-(\d{2})(?:\s+|T)(\d{2}):(\d{2})$/) |
|
114
|
1 |
3 |
if (/^(\d{4})-(\d{2})-(\d{2})$/) |
|
120
|
3 |
0 |
if (/^(\d{1,2})\.(\d{1,2})\.(\d{4})\s+(\d{2}):(\d{2}):(\d{2})(\.\d+)?\s*(\S+)?$/) |
|
134
|
34 |
0 |
if (/^[+-]\d{1,4}$/) { } |
|
153
|
9 |
25 |
if $nocheck |
|
168
|
0 |
128 |
unless $format |
|
174
|
7 |
121 |
unless ($patterns) |
|
188
|
254 |
0 |
$patterns->{$1} ? : |
|
263
|
7 |
2 |
if $self->day == $new->day |
|
264
|
2 |
0 |
if ($new->day < $self->day) |
|
273
|
6 |
0 |
unless defined $n |
|
278
|
5 |
1 |
unless defined $s |
|
283
|
6 |
0 |
unless defined $m |
|
288
|
5 |
1 |
unless defined $h |
|
293
|
5 |
1 |
unless defined $d |
|
298
|
2 |
4 |
unless defined $m |
|
318
|
1 |
5 |
unless defined $y |
|
343
|
1 |
5 |
if ($to eq 'second') |
|
349
|
1 |
4 |
if ($to eq 'minute') |
|
354
|
1 |
3 |
if ($to eq 'hour') |
|
359
|
1 |
2 |
if ($to eq 'day') |
|
364
|
1 |
1 |
if ($to eq 'month') |
|
369
|
1 |
0 |
if ($to eq 'year') |
|
388
|
1 |
0 |
if (defined $tz) |
|
396
|
0 |
1 |
if ($tz eq 'local') { } |
|
|
0 |
1 |
elsif (not $tz =~ /^[+-]\d{4}$/) { } |