Branch Coverage

blib/lib/App/Games/Keno.pm
Criterion Covered Total %
branch 26 48 54.1


line true false branch
60 1 16 unless defined $self->draws
62 1 15 if defined $self->spots and defined $self->num_spots
64 1 1 unless defined $self->spots or defined $self->num_spots
67 0 14 unless (defined $self->verbose)
68 2 12 if ($self->verbose < 0 or $self->verbose > 2)
73 13 1 if (defined $self->spots) { }
1 0 elsif ($self->num_spots >= 1 and $self->num_spots <= 10) { }
74 1 12 if (&any(sub {
77 27 1 unless $_ < 1
3 9 if (&any(sub {
80 1 8 if (scalar @{$self->spots;} != &uniq(@{$self->spots;}))
83 1 7 if (scalar @{$self->spots;} < 1)
86 1 6 if (my $too_many_spots = scalar @{$self->spots;} > 10)
98 0 7 unless (defined $self->verbose)
207 0 0 if ($self->verbose > 0)
222 0 0 if ($matches > 6 and $matches == $self->num_spots)
226 0 0 if ($this_payout > 0)
233 0 0 if ($self->verbose > 1)
236 0 0 if ($matches > 0) { }
244 0 0 if ($this_payout == 0)
250 0 0 if ($self->verbose > 0 and $this_payout > 0)
255 0 0 if ($self->verbose > 0)
271 0 5 if $seen{$candidate}++
283 0 0 if (exists $self->payout_table->{$spot}{$match}) { }