ABC words: Difference between revisions
m
→{{header|Raku}}: More generic display code
Drkameleon (talk | contribs) (Added Arturo implementation) |
Thundergnat (talk | contribs) m (→{{header|Raku}}: More generic display code) |
||
Line 1,398:
=={{header|Raku}}==
<lang perl6>put display 'unixdict.txt'.IO.words».fc.grep({ (.index('a')//next) < (.index('b')//next) < (.index('c')//next) })
sub display ($list, :$cols = 10, :$fmt = '%6d', :$title = "{+$list} matching:\n" ) {
cache $list;
$title ~ $list.batch($cols)».fmt($fmt).join: "\n"
}</lang>
{{out}}
<pre>55
=={{header|REXX}}==
| |||