Games::Poker::Omaha::Hutchison - Hutchison method for scoring Omaha hands
my $evaluator = Games::Poker::Omaha::Hutchison->new("Ah Qd 3s 1d");
my $score = $evaluator->hand_score;
This module implements the Hutchison Omaha Point System for evaluating starting hands in Omaha poker, as described at http://www.thepokerforum.com/omahasystem.htm
my $evaluator = Games::Poker::Omaha::Hutchison->new("Ah Qd Ts 3d");
This takes 4 cards, expresed as a single string. The 'pip value' of the card should be 2-9,T,J,Q,K or A, and the suit, of course, s, h, c or d.
my $score = $evaluator->hand_score;
This returns the number of points assigned to the hand by this System. This figure is roughly equivalent to the percentage chance of this turning into a winning hand in a 10 player game, where each player plays until the end. See the URL above for more information.
The final hand_score() is made up from three component scores, for
suited cards, paired cards, and straight cards. These component scores
can also be accessed individually.
Tony Bowden, based on the rules created by Edward Hutchison.
Please direct all correspondence regarding this module to: bug-Games-Poker-Omaha-Hutchison@rt.cpan.org
Copyright (C) 2004-2005 Tony Bowden.
This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License; either version 2 of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
This is based on the version at http://www.thepokerforum.com/omahasystem.htm
An alternative version is available at http://erh.homestead.com/omaha.html