Playing cards: Difference between revisions

→‎Perl 6: re-added ace and ten back in; no local Perl6 so can't test but SHOULD work
(→‎{{header|J}}: simplify)
(→‎Perl 6: re-added ace and ten back in; no local Perl6 so can't test but SHOULD work)
Line 1,187:
 
=={{header|Perl 6}}==
{{incorrect|Perl 6|The pack of cards seems to be missing the Ace and 10?}}
{{works with|Rakudo|Star}}
<lang perl6>enum Pip <A 2 3 4 5 6 7 8 9 10 J Q K>;
enum Suit <♦ ♣ ♥ ♠>;
 
1,150

edits