Branch Coverage

blib/lib/Game/Cribbage/Score.pm
Criterion Covered Total %
branch 40 42 95.2


line true false branch
52 17 16 if $self->with_starter
60 1 16 if $starter->symbol eq "J"
63 5 55 if ($_->symbol eq "J" and $starter->suit eq $_->suit)
80 415 352 if scalar @_ < 3
83 777 62 if ($first != $values[$_[$i]])
87 22 330 if ($match)
88 15 7 if (scalar @_ == 3) { }
6 1 elsif (scalar @_ == 4) { }
99 1 32 if ($map{'five'}) { }
4 28 elsif ($map{'four'}) { }
4 24 elsif ($map{'three'}) { }
114 2 90 if ($c == 4) { }
1 89 elsif ($c == 5) { }
128 67 700 if &vecsum(@values[@_]) == 15
139 94 23 if $c == 1
140 16 7 if ($c == 2) { }
5 2 elsif ($c == 3) { }
2 0 elsif ($c == 4) { }
155 64 200 if (scalar @{$self->$_;})
156 9 55 if ($_ eq 'run') { }
157 9 0 if $self->$_->[0]