| line |
true |
false |
branch |
| 37 |
0 |
3 |
unless defined $time |
| 50 |
0 |
3 |
unless defined $_ |
| 59 |
3 |
0 |
if ($day, $mon, $yr, $hr, $min, $sec, $tz) = m[^\s* |
| 80 |
0 |
0 |
if ($mon, $day, $hr, $min, $sec, $tz, $yr) = /^\s* # allow intial whitespace |
| 96 |
0 |
0 |
if ($mon, $day, $yr, $hr, $min, $sec) = /^\s* |
| 112 |
0 |
0 |
if ($yr, $mon, $day, $hr, $min, $sec, $tz) = m[^\s* |
| 132 |
0 |
0 |
if ($mon, $day, $yr, $hr, $min, $aorp) = /^\s* |
| 150 |
0 |
3 |
if ($mon =~ /^\d+$/) { } |
| 152 |
0 |
0 |
if $mon < 1 or $mon > 12 |
| 156 |
0 |
3 |
unless exists $MoY{$mon} |
| 162 |
0 |
3 |
unless (defined $yr) |
| 164 |
0 |
0 |
if $mon > $current_month |
| 168 |
0 |
3 |
if $yr > 99 and $yr < 1900 |
| 169 |
0 |
3 |
if $yr < 50 |
| 170 |
3 |
0 |
if $yr >= 1900 |
| 177 |
0 |
3 |
if $yr > 138 |
| 178 |
0 |
3 |
if $yr < 70 |
| 181 |
0 |
3 |
if ($aorp) |
| 183 |
0 |
0 |
if $hr == 12 and $aorp eq 'AM' |
| 184 |
0 |
0 |
if $aorp eq 'PM' and $hr != 12 |
| 188 |
0 |
9 |
unless defined $_ |
| 191 |
0 |
3 |
unless defined $tz |
| 192 |
0 |
3 |
unless defined $tz |
| 196 |
0 |
3 |
if ($tz =~ /^([-+])?(\d\d?):?(\d\d)?$/) |
| 198 |
0 |
0 |
if $3 |
| 199 |
0 |
0 |
if $1 and $1 ne '-' |
| 212 |
0 |
0 |
unless defined $time |
| 222 |
0 |
0 |
unless defined $time |