Boustrophedon transform: Difference between revisions

m
→‎{{header|Raku}}: delete some superstitious brackets
m (→‎{{header|Raku}}: delete some superstitious brackets)
Line 225:
 
=={{header|Raku}}==
<syntaxhighlight lang="raku" line>sub boustrophedon-transform (@seq) { map *.tail, ([@seq[0]], {[[\+] flat @seq[++$ ], .reverse]}…*) }
 
sub abbr ($_) { .chars < 41 ?? $_ !! .substr(0,20) ~ '…' ~ .substr(*-20) ~ " ({.chars} digits)" }
10,333

edits