| blib/lib/Net/IMP/Pattern.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 14 | 30 | 46.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 45 | 0 | 0 | 16 | $rxlen and $rxlen =~ /^\d+$/ |
| 0 | 0 | 16 | $rxlen and $rxlen =~ /^\d+$/ and $rxlen > 0 | |
| 60 | 16 | 0 | 0 | defined $rxdir and not $rxdir ~~ [0, 1] |
| 63 | 0 | 0 | 16 | $act and $act ~~ ['deny', 'reject', 'replace'] |
| 119 | 82 | 0 | 0 | defined $self->{'rxdir'} and $dir != $self->{'rxdir'} |
| line | l | !l | condition |
|---|---|---|---|
| 201 | 0 | 0 | $self->{'actdata'} // '' |
| 223 | 3 | 0 | $self->{'actdata'} // '' |
| 230 | 31 | 0 | $self->{'actdata'} // '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 125 | 3 | 21 | 58 | $type > 0 or $type != $self->{'buftype'}[$dir] |
| 128 | 2 | 1 | 20 | $self->{'buftype'}[$dir] || $type > 0 |
| 297 | 3 | 0 | 0 | eval { do { qr/$cfg{'rx'}/ } } || croak("'$cfg{'rx'}' is no valid regex") |