blib/lib/List/MoreUtils/PP.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 42 | 56 | 75.0 |
line | l | !l | condition |
---|---|---|---|
77 | 39994 | 8 | &$f() and return 1 |
93 | 39996 | 5 | &$f() and return 0 |
323 | 0 | 5 | @$list = (@{$list;}[0 .. $c], $val, @{$list;}[$c + 1 .. $#$list]) and return 1 |
331 | 0 | 7 | @$list = (@{$list;}[0 .. $c], $val, @{$list;}[$c + 1 .. $#$list]) and return 1 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
68 | 2643 | 13 | 10 | &$f() and $found++ |
112 | 2643 | 13 | 10 | &$f() and $found++ |
190 | 59995 | 10005 | 0 | &$f() and ++$count |
366 | 5 | 8 | 14 | $more &&= !&$test() |
375 | 3 | 6 | 18 | $more &&= do { my $x = $lag; $lag = !&$test(); $x } |
491 | 23 | 29 | 0 | $max < $#$_ and $max = $#$_ |
501 | 4 | 7 | 0 | $max < $#$_ and $max = $#$_ |
582 | 1002 | 166 | 0 | $max < ++$seen{$k = $_} && ++$max |
0 | 0 | 0 | $max < ++$seen_undef && ++$max | |
590 | 10 | 0 | 0 | $seen_undef and $seen_undef == $max |
line | l | !l | condition |
---|---|---|---|
85 | 24999 | 5 | &$f() or return 0 |
101 | 19999 | 6 | &$f() or return 1 |
517 | 42 | 104 | $ret{$w} ||= [] |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
198 | 20003 | 49997 | 0 | &$f() or ++$count |
348 | 4 | 6 | 19 | $started ||= do { my $x = $lag; $lag = &$test(); $x } |
359 | 10 | 6 | 11 | $started ||= &$test() |
455 | 0 | 0 | 10 | $index == 0 or $index > $max |