如何获取数组的最后一个元素并显示其余元素？

Question

如何获取数组的最后一个元素并显示其余元素？

像这样 :

@myArray = (1,1,1,1,1,2);

预期产量:

SomeVariable1 = 11111
SomeVariable2 = 2

Answer 1

# print last element
print $myArray[-1];

# joined rest of the elements
print join "", @myArray[0 .. $#myArray-1] if @myArray >1;

如果你不介意修改数组,

# print last element
print pop @myArray;

# joined rest of the elements
print join "", @myArray;