Branch Coverage

blib/lib/Games/Solitaire/Verify/App/CmdLine/From_ShirlHartSolver.pm
Criterion Covered Total %
branch 43 66 65.1


line true false branch
44 7 36 $dest eq 'e' ? :
51 118 23 if ($c =~ /\A$COL_RE\z/)
61 75 8 if (defined(my $src_col_idx = &$try_col($src_char))) { }
8 0 elsif (defined(my $src_fc_idx = &$try_fc($src_char))) { }
63 22 53 if (defined(my $dest_fc_idx = &$try_fc($dest_char)))
65 0 22 if ($dest ne 'f')
69 0 22 if ($src_card ne $self->_st->get_column($src_col_idx)->top->to_string)
82 38 15 if (defined(my $dest_col_idx = &$try_col($dest_char)))
88 0 38 unless (defined $idx)
92 0 38 if (&$is_invalid_dest_col($dest_col_idx))
106 15 0 if ($dest_char eq 'h')
108 0 15 if ($src_card ne $self->_st->get_column($src_col_idx)->top->to_string)
113 0 15 if ($dest ne 'h')
126 3 5 if ($dest_char eq 'h')
128 0 3 if ($src_card ne $self->_st->get_freecell($src_fc_idx)->to_string)
132 0 3 if ($dest ne 'h')
143 5 0 if (defined(my $dest_col_idx = &$try_col($dest_char)))
145 0 5 if ($src_card ne $self->_st->get_freecell($src_fc_idx)->to_string)
149 0 5 if (&$is_invalid_dest_col($dest_col_idx))
171 0 83 if (@fields != 5)
176 0 83 if ($idx ne $self->_input_move_index)
184 0 83 if (@src_dest != 2)
191 0 83 unless $self->_move_was_performed
201 62 21 unless length $found_moves
206 13 30 if (length $s == 2)
210 0 30 unless my($start, $end) = $s =~ /\A(\S\S)-(\S\S)\z/
214 0 30 if ($sc->suit ne $ec->suit)
218 0 30 if (exists $suits{$sc->suit})
222 0 30 if ($sc->rank > $ec->rank)
245 86 43 unless ($@)
249 30 56 if ($rank == $rec->{'end'}->rank) { }
265 0 21 if (%suits)
285 2 0 if $l =~ /\|/