| line |
true |
false |
branch |
|
47
|
0 |
0 |
unless $_[0] % 400 == 0
|
|
55
|
0 |
0 |
$m < 3 ? :
|
|
58
|
0 |
0 |
if is_leap($_)
|
|
60
|
0 |
0 |
if $m < 3 and is_leap($y1)
|
|
61
|
0 |
0 |
if $m >= 3 and is_leap($y2)
|
|
72
|
2 |
24155 |
if $time < -30610224000 or $time > 253402300799
|
|
85
|
5 |
26250 |
unless my($year, $month, $day, $hour, $min, $sec) = $str =~ /^\s*(\d{4})[\-\s]*(\d{2})[\-\s]*(\d{2})\s*T\s*(\d{2})[\:\s]*(\d{2})[\:\s]*(\d{2})[\,\.\d]{0,10}\s*Z\s*$/i
|
|
88
|
1 |
26249 |
if $year < 1000
|
|
90
|
2 |
26247 |
if $sec == 60 or $sec == 61
|
|
93
|
0 |
0 |
if (not is_y2038_supported() and $year <= 1901 || $year >= 2038)
|