| lib/App/Perlbrew/Util.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 18 | 20 | 90.0 |
| line | true | false | branch |
|---|---|---|---|
| 18 | 8534 | 46984 | if $_ < $m |
| 36 | 1313 | 18506 | $a[$i - 1] eq $b[$j - 1] ? : |
| 53 | 1 | 49 | if not defined $_->[1] or $_->[1] == 0 |
| 54 | 14 | 35 | unless ($stats0 eq join(" ", $_->[0], $_->[1])) |
| 65 | 1 | 208 | if ($version eq 'blead') { } |
| 70 | 0 | 209 | if @v < 2 |
| 72 | 24 | 185 | if ($v[1] <= 5) { } |
| 77 | 141 | 0 | $v[1] >= 6 ? : |
| 90 | 32 | 154 | $d < $SIMILAR_DISTANCE ? : |
| 93 | 6 | 1 | if (@similar_tokens) |