Playing cards: Difference between revisions
Content deleted Content added
→{{header|REXX}}: added version 2. -- ~~~~ |
→{{header|Perl 6}}: this code is broken |
||
Line 2,008: | Line 2,008: | ||
=={{header|Perl 6}}== |
=={{header|Perl 6}}== |
||
{{incorrect|generates "use of unitialized value" warnings and no significative output}} |
|||
{{works with|Rakudo|Star}} |
|||
<lang perl6>enum Pip <A 2 3 4 5 6 7 8 9 10 J Q K>; |
<lang perl6>enum Pip <A 2 3 4 5 6 7 8 9 10 J Q K>; |
||
enum Suit <♦ ♣ ♥ ♠>; |
enum Suit <♦ ♣ ♥ ♠>; |