| blib/lib/DateTime/Format/Text.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 20 | 45 | 44.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 139 | 0 | 133 | 5 | scalar @_ and scalar(@_) % 2 == 0 |
| 221 | 29 | 0 | 53 | not defined $month and $string =~ /($m|$sm)/i |
| 226 | 29 | 0 | 53 | not defined $year and $string =~ /(\d{4})/ |
| 232 | 0 | 0 | 82 | defined $month and defined $year |
| 0 | 29 | 53 | defined $month and defined $year and not defined $day | |
| 251 | 0 | 0 | 82 | $day and $month |
| 0 | 0 | 82 | $day and $month and $year |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 78 | 1 | 18 | 1 | ref $proto || $proto |
| 207 | 0 | 0 | 0 | $day //= $2 |
| 208 | 0 | 0 | 0 | $month //= $4 |
| 209 | 0 | 0 | 0 | $year //= $5 |
| 211 | 0 | 12 | 0 | $month //= $1 |
| 212 | 0 | 12 | 0 | $day //= $2 |
| 213 | 0 | 12 | 0 | $year //= $4 |
| 258 | 54 | 11 | 163 | $month eq $month_names[$i] or $month eq $short_month_names[$i] |