Perl 6 数组分段 rotor

切成每段n个元素的列表

# Perl 6 code
my $a-array = (3,4,5, 7,8,9, 12,13,14, 15);
$a-array.rotor(3,True) # 每三个元素一组， True表示多出来的也单独一个组
# gets ((3 4 5) (7) (8 9 12) (13)) #二位数组

引用

1. Array in Perl 6
1. class Array: Perl 6 Documentation