lib/Package/Abbreviate.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 26 | 30 | 86.6 |
line | true | false | branch |
---|---|---|---|
12 | 0 | 18 | unless $max and $max =~ /^\d+$/ |
14 | 0 | 18 | unless $opts |
20 | 14 | 4 | if @packages == 1 |
28 | 2 | 6 | if $seen{$_}++ |
30 | 2 | 2 | if ($num_of_dupes) |
33 | 1 | 3 | if $seen{$_}++ |
35 | 1 | 1 | if $num_of_dupes |
44 | 4 | 18 | unless $excess > 0 |
50 | 0 | 36 | if $part =~ /^[a-z]/ |
52 | 8 | 28 | unless $excess > 0 |
54 | 9 | 1 | if ($$self{'eager'}) |
57 | 2 | 7 | if ($n < @parts - 1) { } |
61 | 2 | 5 | if ($excess > 0) { } |
69 | 2 | 8 | if length $abbreviation > $max |
76 | 3 | 0 | if $$self{'croak'} |