如何在Perl中移动数组中的元素

Question

说我有一个包含以下单词的数组：

@animals = ("cat", "dog", "mouse", "elephant", "giraffe");

如何将元素0移动到数组的末尾？所以现在它将成为：

@animals = ("dog", "mouse", "elephant", "giraffe", "cat");

是否有使用shift，unshift，pop或push的简单方法？

Answer 1

• shift删除第一个元素。
• unshift在前面添​​加了一个元素。
• pop删除最后一个元素。
• push在最后添加了一个元素。
• splice可以在列表中的任何位置添加和删除任意数量的元素。

shift / unshift在前线工作，最后pop/push工作。

在您的情况下，您需要push(@animals, shift(@animals))。删除第一个元素并将其放在最后。