第 5 章： Perl 6 列表
> my @list = (1,2,3) 1 2 3
end 获取最后一个元素的位置：
> @list.end 2
keys 获取每个元素的位置索引：
> @list.keys 0 1 2
values 获取每个元素的值：这个功能似乎针对散列有用
> @list.values 1 2 3 > @list.kv 0 1 1 2 2 3 > @list.kv.perl ((0,1),(1,2),(2,3)).list > @list.pairs 0 => 1 1 => 2 2 => 3 > @list.pairs.perl (0 => 1,1 => 2,2 => 3).list
join,将所有的元素合并起来：
> @list.join.perl "123"
map 可以针对列表的每个元素进行运算：
> @list.map: { .WHAT.perl }
Int Int Int
> @list.map: { .WHAT }
(Int) (Int) (Int)
> @list.map: {.Str.chars}
1 1 1
grep 针对列表的每个元素进行一个规则的筛选：
> @list.grep: Int
1 2 3
> @list.grep: { .Str.chars > 0 }
1 2 3
grep-index 获取的是元素的索引：
> @list.grep-index: { .Str.chars > 0 }
0 1 2
first 用于获取满足条件的第一个值：
> @list.first: * > 0 1 > @list.first: Int 1
first-index 用户获取第一个满足条件的值的索引：
> @list.first-index: Int 0
Bool 返回非空数组为 True,否则为 False:
> @list.Bool True > ().Bool False
Numeric 和 elems 的作用一样，返回数组的元素个数：
> @list.Numeric 3
pick 用于随机的从数组中抽取数据：
> my @array = <a b c d e> a b c d e > @array.pick e > @array.pick(3) e c b > @array.pick: * a c b d e
permutations 获取元素的所有排列组合：
> say .join('|') for <a b c>.permutations
a|b|c
a|c|b
b|a|c
b|c|a
c|a|b
c|b|a
combinations 用于生成不重复的数组：
> .say for combinations(4,2) 0 1 0 2 0 3 1 2 1 3 2 3
reverse 用于倒序数组：
> <hello world>.reverse world hello > reverse ^10 9 8 7 6 5 4 3 2 1 0
rotate 用于翻转数组：
> <a b c d e>.rotate(2) c d e a b > <a b c d e>.rotate(-1) e a b c d
sort 默认的排序是按照 ascii 值来进行从小到大的排列：
> <c d e a b>.sort a b c d e > <1 2 3 4 5 10>.sort 1 10 2 3 4 5
sort 也可以设置排序的规则，字符串对比和数字对比的比较操作符不同：
> <1 2 3 4 5 10>.sort: { $^b leg $^a }
5 4 3 2 10 1
> <1 2 3 4 5 10>.sort: { $^b > $^a }
10 5 4 3 2 1
> (3,-4,7,-1,0).sort: { $^b leg $^a }
7 3 2 0 -4 -1
> (3,0).sort: { $^b > $^a }
7 3 2 0 -1 -4