| blib/lib/Date/Parse/Modern.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 49 | 76 | 64.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 193 | 14 | 10 | 13 | not $month and $str =~ /$rule_2/ |
| 215 | 27 | 5 | 5 | not $month and $str =~ /(.*)($MONTH_REGEXP)(.*)/ |
| 223 | 0 | 0 | 3 | $before and $after |
| 270 | 25 | 1 | 1 | $ampm and $hour == 24 || $hour == 12 |
| 321 | 34 | 0 | 0 | $err and $err =~ /Undefined subroutine/ |
| 344 | 2 | 17 | 15 | $ret and $str =~ /$tz_rule/ |
| 416 | 0 | 0 | 0 | $USE_TZ_CACHE and $x->{$cache_key} |
| line | l | !l | condition |
|---|---|---|---|
| 208 | 0 | 2 | $5 || 0 |
| 220 | 5 | 0 | $$MONTH_MAP{lc $2} || 0 |
| 232 | 3 | 0 | $1 || 0 |
| 257 | 21 | 6 | $4 || 0 |
| 262 | 2 | 25 | $6 || '' |
| 315 | 0 | 0 | $@ || 'Error' |
| 350 | 3 | 0 | $6 || $7 || '' |
| 353 | 2 | 8 | $TZ_OFFSET->{$tz_code} || 0 |
| 387 | 0 | 0 | $year || -1 |
| 0 | 0 | $month || -1 | |
| 0 | 0 | $day || -1 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 155 | 13 | 0 | 1 | $2 or $3 |
| 162 | 1 | 0 | 13 | $5 or $6 |
| 208 | 7 | 0 | 2 | $year ||= int($5 || 0) |
| 270 | 1 | 1 | 0 | $hour == 24 || $hour == 12 |
| 276 | 24 | 3 | 10 | $hour || $min || $sec |
| 277 | 32 | 0 | 5 | $year || $month || $day |
| 279 | 27 | 6 | 4 | $has_time or $has_date |
| 303 | 33 | 1 | 0 | $month ||= (localtime())[4] + 1 |
| 304 | 33 | 1 | 0 | $day ||= (localtime())[3] |
| 306 | 29 | 5 | 0 | $year ||= (localtime())[5] + 1900 |
| 348 | 7 | 3 | 5 | $6 or $7 |