NAME
Poker::Score - Identify and score specific poker hands. Base class for specific scoring systems.
VERSION
Version 0.01
SYNOPSIS
# This is just a base class. Poker::Score::High shows a real example.
use Poker::Score::High; #standard highball
use Poker::Dealer;
use feature qw(say);
# Create highball score object
my $scorer = Poker::Score::High->new;
# Create dealer, shuffle deck and deal out five cards
my $dealer = Poker::Dealer->new;
$dealer->shuffle_deck;
my $cards = $dealer->deal_up(5);
# Numerical score of five card poker hand
my $score = $scorer->score($cards);
say $score;
# English name of hand (e.g. 'Two Pair')
say $scorer->hand_name($score);METHODS
hand_name
English name of given hand (e.g., 'Two Pair')
score
Numercal score of given hand (higher is better)
SEE ALSO
Poker::Score::High, Poker::Score::Low8, Poker::Score::Low27, Poker::Score::LowA5, Poker::Score::Badugi, Poker::Score::Badugi27, Poker::Score::Chinese, Poker::Score::HighSuit, Poker::Score::Bring::High, Poker::Score::Bring::Low, Poker::Score::Bring::Wild
AUTHOR
Nathaniel Graham, <ngraham at cpan.org>
LICENSE AND COPYRIGHT
Copyright 2016 Nathaniel Graham.
This program is free software; you can redistribute it and/or modify it under the terms of the the Artistic License (2.0). You may obtain a copy of the full license at: