| blib/lib/List/Util/sglice.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 18 | 88.8 |
| line | true | false | branch |
|---|---|---|---|
| 21 | 4 | 2 | unless defined $num_remove |
| 24 | 5 | 1 | if ($num_remove >= 0) { } |
| 26 | 1 | 44 | if @indices >= $num_remove |
| 27 | 21 | 23 | if (do { local $_ = $array->[$index]; &$code($_, $index) }) |
| 33 | 1 | 3 | if @indices >= -$num_remove |
| 34 | 2 | 1 | if (do { local $_ = $array->[$index]; &$code($_, $index) }) |
| 40 | 0 | 4 | unless @indices |
| 50 | 5 | 1 | if ($wantarray) { } |
| 1 | 0 | elsif (defined $wantarray) { } |