Hex words: Difference between revisions
Content added Content deleted
No edit summary |
Thundergnat (talk | contribs) (→{{header|Raku}}: small simplification) |
||
| Line 2,025: | Line 2,025: | ||
=={{header|Raku}}== |
=={{header|Raku}}== |
||
Sorted by digital root with a secondary alphabetical sort. |
Sorted by digital root with a secondary alphabetical sort. |
||
<syntaxhighlight lang="raku" line>sub dr (Int $_ is copy) { $_ = |
<syntaxhighlight lang="raku" line>sub dr (Int $_ is copy) { $_ = .comb.sum while .chars > 1; $_ } |
||
my %hex = './unixdict.txt'.IO.slurp.words.grep( *.chars > 3 )\ |
my %hex = './unixdict.txt'.IO.slurp.words.grep( *.chars > 3 )\ |
||