Games::Solitaire::Verify::Solution::ExpandMultiCardMoves - expand the moves in a solution from multi-card moves into individual single-card moves.
Version 0.1001
use Games::Solitaire::Verify::Solution::ExpandMultiCardMoves;
my $input_filename = "freecell-24-solution.txt";
open (my $input_fh, "<", $input_filename)
or die "Cannot open file $!";
# Initialise a column
my $solution = Games::Solitaire::Verify::Solution::ExpandMultiCardMoves->new(
{
input_fh => $input_fh,
variant => "freecell",
output_fh => \*STDOUT,
},
);
my $ret = $solution->verify();
close($input_fh);
if ($ret)
{
die $ret;
}
else
{
print "Solution is OK";
}
Constructs a new solution verifier with the variant $variant (see Games::Solitaire::Verify::VariantsMap ), and the input file handle $input_fh.
If $variant is "custom", then the constructor also requires a 'variant_params' key which should be a populated Games::Solitaire::Verify::VariantParams object.
Traverse the solution verifying it.
Shlomi Fish, <shlomif at iglu.org.il>
Please report any bugs or feature requests to bug-games-solitaire-verifysolution-move at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Games-Solitaire-Verify. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
You can find documentation for this module with the perldoc command.
perldoc Games::Solitaire::Verify::Solution
You can also look for information at:
http://rt.cpan.org/NoAuth/Bugs.html?Dist=Games-Solitaire-Verify
Copyright 2008 Shlomi Fish.
This program is released under the following license: MIT/X11 ( http://www.opensource.org/licenses/mit-license.php ).
