从阵列中打印10个元素

Question

如果我有一个我用来创建50个随机数的数组，那么我会用数字对它们进行排序。现在我想说我想打印出10个最大的数字（元素40到50）我可以说：

print($array[40]) print($array[41]) print($array[42])等等 但是有更简洁的方法吗？希望我能说清楚。

干杯

Answer 1

你可以遍历索引。

say $array[$_] for 40..49;

此处的偏移更有意义。

say $array[$_] for -10..-1;

您也可以使用数组切片。

say for @array[-10..-1];

要在一行打印，您可以使用join。

say join ', ', @array[-10..-1];

Answer 2

试试这个：

print  join ',',@array[-10..-1] ,"\n";