| blib/lib/DateTime/Format/Genealogy.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 15 | 21 | 71.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 105 | 2 | 17 | 8 | scalar @_ and scalar(@_) % 2 == 0 |
| 164 | 4 | 0 | 18 | $date =~ /^\d/ and my $d = $self->_date_parser_cached($date) |
| 169 | 0 | 0 | 4 | not $date =~ /^(Abt|ca?)/i and $date =~ /^[\w\s,]+$/ |
| 217 | 0 | 0 | 16 | $d and ref $d eq "ARRAY" |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 69 | 0 | 14 | 1 | ref $proto || $proto |
| 125 | 2 | 2 | 31 | $date =~ /^bef\s/i or $date =~ /^aft\s/i |
| 4 | 1 | 30 | $date =~ /^bef\s/i or $date =~ /^aft\s/i or $date =~ /^abt\s/i |