line |
true |
false |
branch |
93
|
0 |
9 |
unless defined $arg |
96
|
5 |
4 |
if (wantarray) { } |
97
|
5 |
0 |
$gm ? : |
98
|
5 |
0 |
if $Time::Precise::PRECISION |
102
|
4 |
0 |
$gm ? : |
103
|
4 |
0 |
$Time::Precise::PRECISION ? : |
152
|
2 |
0 |
unless ($Options{'no_range_check'}) |
153
|
0 |
2 |
if $month > 11 or $month < 0 |
158
|
0 |
2 |
if $month == 1 and _is_leap_year($year) |
161
|
0 |
2 |
if $mday > $md or $mday < 1 |
162
|
0 |
2 |
if $hour > 23 or $hour < 0 |
163
|
0 |
2 |
if $min > 59 or $min < 0 |
164
|
0 |
2 |
if $sec > 59 or $sec < 0 |
169
|
0 |
2 |
unless ($Options{'no_range_check'} or abs $days < $MaxDay) |
171
|
0 |
0 |
if $days > $MaxDay |
179
|
0 |
2 |
if $year < 0 and not _is_leap_year($year) |
189
|
3 |
1 |
if $_[0] % 4 |
190
|
0 |
1 |
if $_[0] % 100 |
191
|
0 |
1 |
if $_[0] % 400 |
202
|
0 |
0 |
if $_[5] < 0 and not _is_leap_year($_[5]) |
205
|
0 |
0 |
unless my $zone_off = $loc_for_ref_t - $ref_t |
217
|
0 |
0 |
if (not $dst_off and $ref_t - 3600 - _timegm(&Time::Precise::localtime($loc_t - 3600)) < 0) |
226
|
0 |
0 |
if $dst_off > 0 |
231
|
0 |
0 |
if $s != $_[0] or $m != $_[1] or $h != $_[2] |
243
|
0 |
6 |
unless $year =~ /^\d+$/ and $month =~ /^\d+$/ and $day =~ /^\d+$/ |
247
|
0 |
6 |
unless $year |
248
|
0 |
6 |
if $month < 1 or $month > 12 |
249
|
0 |
6 |
if $day < 1 |
250
|
2 |
4 |
if ($month == 2) { } |
251
|
1 |
1 |
if (is_leap_year($year)) { } |
252
|
0 |
1 |
if $day > 29 |
254
|
1 |
0 |
if $day > 28 |
257
|
2 |
2 |
if $day > $month_duration->{$month} |
277
|
1 |
1 |
unless defined $time |
278
|
2 |
0 |
$gmt ? : |
305
|
0 |
1 |
if @_ % 2 |
306
|
1 |
0 |
$gm ? : |
317
|
0 |
6 |
unless $p->{$i} =~ /^(-){0,1}\d+(\.\d+){0,1}$/ |
319
|
0 |
1 |
if $p->{'month'} < 1 or $p->{'month'} > 12 |
321
|
0 |
3 |
unless $p->{$i} >= 0 and $p->{$i} < 60 |
323
|
0 |
0 |
is_leap_year($p->{'year'}) ? : |
|
0 |
1 |
int $p->{'month'} == 2 ? : |
324
|
0 |
1 |
unless $p->{'day'} >= 1 and $p->{'day'} <= $max_day |
325
|
1 |
0 |
$gm ? : |