| blib/lib/Regexp/Parsertron.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 7 | 12 | 58.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 431 | 852 | 0 | 8 | $pos + 1 == $length and substr($string_re, $pos, 1) eq ')' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 168 | 2966 | 342 | 11533 | $event_name =~ /^open_(?:bracket|parenthesis)$/ or $event_name =~ /_prefix$/ |
| 230 | 0 | 0 | 7 | not defined $wanted_uid or $wanted_uid < 1 |
| 0 | 0 | 7 | not defined $wanted_uid or $wanted_uid < 1 or $wanted_uid > $self->uid |