Help for this page

Select Code to Download

Select or download this

#!perl
# solving my app's Canfield (draw by 1) rules
...
,'6H','KH'
,'2S','4S','KS'
,'6D'