| blib/lib/List/SomeUtils/PP.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 35 | 42 | 83.3 |
| line | l | !l | condition |
|---|---|---|---|
| 66 | 39994 | 8 | &$f() and return 1 |
| 82 | 39996 | 5 | &$f() and return 0 |
| 243 | 0 | 5 | @$list = (@{$list;}[0 .. $c], $val, @{$list;}[$c + 1 .. $#$list]) and return 1 |
| 251 | 0 | 7 | @$list = (@{$list;}[0 .. $c], $val, @{$list;}[$c + 1 .. $#$list]) and return 1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 57 | 2643 | 13 | 10 | &$f() and $found++ |
| 101 | 2643 | 13 | 10 | &$f() and $found++ |
| 110 | 59995 | 10005 | 0 | &$f() and ++$count |
| 286 | 5 | 8 | 14 | $more &&= !&$test() |
| 295 | 3 | 6 | 18 | $more &&= do { my $x = $lag; $lag = !&$test(); $x } |
| 400 | 8 | 14 | 0 | $max < $#$_ and $max = $#$_ |
| line | l | !l | condition |
|---|---|---|---|
| 74 | 24999 | 5 | &$f() or return 0 |
| 90 | 19999 | 6 | &$f() or return 1 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 118 | 20003 | 49997 | 0 | &$f() or ++$count |
| 268 | 4 | 6 | 19 | $started ||= do { my $x = $lag; $lag = &$test(); $x } |
| 279 | 10 | 6 | 11 | $started ||= &$test() |
| 375 | 0 | 0 | 10 | $index == 0 or $index > $max |