| blib/lib/Date/Parse/Modern.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 49 | 76 | 64.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 194 | 14 | 10 | 13 | not $month and $str =~ /$rule_2/ |
| 216 | 27 | 5 | 5 | not $month and $str =~ /(.*)($MONTH_REGEXP)(.*)/ |
| 224 | 0 | 0 | 3 | $before and $after |
| 271 | 25 | 1 | 1 | $ampm and $hour == 24 || $hour == 12 |
| 327 | 34 | 0 | 0 | $err and $err =~ /Undefined subroutine/ |
| 352 | 2 | 17 | 15 | $ret and $str =~ /$tz_rule/ |
| 424 | 0 | 0 | 0 | $USE_TZ_CACHE and $x->{$cache_key} |
| line | l | !l | condition |
|---|---|---|---|
| 209 | 0 | 2 | $5 || 0 |
| 221 | 5 | 0 | $$MONTH_MAP{lc $2} || 0 |
| 233 | 3 | 0 | $1 || 0 |
| 258 | 21 | 6 | $4 || 0 |
| 263 | 2 | 25 | $6 || '' |
| 321 | 0 | 0 | $@ || 'Error' |
| 358 | 3 | 0 | $6 || $7 || '' |
| 361 | 2 | 8 | $TZ_OFFSET->{$tz_code} || 0 |
| 395 | 0 | 0 | $year || -1 |
| 0 | 0 | $month || -1 | |
| 0 | 0 | $day || -1 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 156 | 13 | 0 | 1 | $2 or $3 |
| 163 | 1 | 0 | 13 | $5 or $6 |
| 209 | 7 | 0 | 2 | $year ||= int($5 || 0) |
| 271 | 1 | 1 | 0 | $hour == 24 || $hour == 12 |
| 277 | 24 | 3 | 10 | $hour || $min || $sec |
| 278 | 32 | 0 | 5 | $year || $month || $day |
| 280 | 27 | 6 | 4 | $has_time or $has_date |
| 304 | 33 | 1 | 0 | $month ||= (localtime())[4] + 1 |
| 305 | 33 | 1 | 0 | $day ||= (localtime())[3] |
| 307 | 29 | 5 | 0 | $year ||= (localtime())[5] + 1900 |
| 356 | 7 | 3 | 5 | $6 or $7 |