David Warring dwarring

Perl-0b110^W Raku and C hacker

dwarring / poker hand classification

Last active August 29, 2015 14:02 — forked from masak/poker hand classification

	# courtesy of https://gist.github.com/masak/244255
	use v6;

	enum Suit < ♥ ♦ ♣ ♠ >;
	enum Rank (2, 3, 4, 5, 6, 7, 8, 9, 10,
	'j', 'q', 'k', 'a');

	class Card {
	has Suit $.suit;
	has Rank $.rank;