Branch Coverage

blib/lib/Games/Cards/ShuffleTrack.pm
Criterion Covered Total %
branch 96 98 97.9


line true false branch
174 1 36 if (ref $order eq 'ARRAY') { }
287 10 4 $self->orientation eq 'down' ? :
342 3 30 if (wantarray and @_ > 1) { }
354 5 1 if (exists $expressions->{$param}) { }
370 29 6 exists $expressions->{$param} ? :
377 211 1375 if (&any(sub { $card =~ /$_/; } , @expressions))
406 1 5 unless (defined $times)
410 2 4 if $times < 1
414 1 3 $times > 1 ? :
449 9 9 if (&looks_like_number($param)) { }
457 7 8 unless @number_of_cards
461 1 7 unless $number_of_cards > 0
467 2 5 if ($where_to_drop eq 'drop-top') { }
500 1 2 $times > 1 ? :
515 19 72 if (@deck < $max)
516 3 88 if (@deck < $min)
616 52 8 $faro eq 'in' ? :
679 0 25 if (defined $position and &looks_like_number($position) and abs $position > $self->deck_size)
736 11 8 if (defined $_[0] and ref $_[0] eq 'Games::Cards::ShuffleTrack') { }
750 2 17 if (not defined $lower_limit) { }
10 7 elsif (not defined $upper_limit) { }
831 1 1 $times > 1 ? :
902 398 64 &looks_like_number($card) ? :
908 35 389 wantarray ? :
915 396 2 if ($card) { }
916 368 28 if ($card > 0)
917 3 393 $card > $self->deck_size - 1 ? :
932 59 5 $position ? :
953 1 1 if ($position == 1) { }
979 1 1 if ($position > $self->deck_size)
1056 1 6 if (not defined $position) { }
1 5 elsif ($position > $self->deck_size) { }
2 3 elsif ($position < 0) { }
1110 2 17 unless ($self->size)
1118 11 14 if (ref $param eq 'Games::Cards::ShuffleTrack') { }
13 1 elsif (exists $shortcuts->{$param}) { }
1130 11 6 if (defined $destination) { }
1154 67 7 if ($position > 0)
1189 4 69 if (_is_shortcut($position))
1215 52 4 defined $upper_limit ? :
1253 1 5 $has_destination ? :
1258 4 2 if (defined $lower_limit) { }
1260 2 2 defined $upper_limit ? :
1275 1 5 $has_destination ? :
1286 2 4 $limit < 0 ? :
1300 6 1 if (&looks_like_number($param)) { }
1 0 elsif (ref $param eq 'Games::Cards::ShuffleTrack') { }
1328 5 26 unless (defined $position)
1332 8 23 if (&any(sub { $_ eq $position; } , keys %$cut_limits))