perl数组中正常的下标运算,想必大家都比较熟悉,这里不作说明。子数组可以用子数组形式来交换元素:

perl数组的多数字下标示例代码