raku - 迭代字符串(UAX #29)

Question

say $s.substr($_, 1) for 0..^$s.chars

是我能找到的最短的。你能把它打到一个合理的大小并避免重复吗？

Perl 5 更短: say for split /\b{g}/, $s

Answer 1

comb没有参数的方法将挑选出每个字符，因此:

.say for $s.comb;

将执行所需的操作(并且也比 Perl 5 版本短 :-))。