NAME

Poker::Dealer - Simple class to represent a poker dealer

VERSION

Version 0.01

SYNOPSIS

use Poker::Dealer;

my $dealer = Poker::Dealer->new;

$dealer->shuffle_deck;

# Returns an array_ref of face-up card objects
my $cards = $dealer->deal_up(4)

# Returns an array_ref of face-down card objects
my $cards = $dealer->deal_down(5)

SUBROUTINES/METHODS

shuffle_deck

Creates a new deck and randomizes the cards.

reshuffle

Shuffles cards in the discard pile and adds them to the existing deck.

deal_down

Returns an array_ref of Poker::Card objects face down

deal_up

Returns an array_ref of Poker::Card objects face up

deal_named

Fetch a specific set of cards from the deck. # Deal yourself two aces: $cards = $dealer->deal_named(['As', 'Ah'])

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:

http://www.perlfoundation.org/artistic_license_2_0