blib/lib/Text/Dice.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 12 | 14 | 85.7 |
line | true | false | branch |
---|---|---|---|
13 | 0 | 36 | unless 2 == @_ |
16 | 34 | 2 | if (not ref $_[0] || ref $_[1]) { } |
1 | 1 | elsif ('ARRAY' eq ref $_[0] and 'ARRAY' eq ref $_[1]) { } | |
35 | 0 | 35 | unless $counts1 and $counts2 |
37 | 4 | 31 | $counts1 > $counts2 ? : |
42 | 114 | 315 | unless my $count2 = $larger->{$pair} |
43 | 37 | 278 | $count2 > $count1 ? : |