Poker hand analyser: Difference between revisions
Content deleted Content added
mNo edit summary |
→{{header|Perl 6}}: use unary sort format - http://perl6advent.wordpress.com/2013/12/23/day-23-unary-sort/ |
||
| Line 130: | Line 130: | ||
} |
} |
||
my @c = %n.values.sort: |
my @c = %n.values.sort: * <=> *; |
||
@c[0]++ for @<joker>; |
@c[0]++ for @<joker>; |
||