unshift ARRAY,LIST

在数组的开头添加一个或多个元素。这与 shift 相反。

my @animals = ("cat");
unshift(@animals, "mouse"); # ("mouse", "cat")

my @colors = ("red");
unshift(@colors, ("blue", "green")); # ("blue", "green", "red")

返回更新后的数组中的新元素数。

# Return value is the number of items in the updated array
my $color_count = unshift(@colors, ("yellow", "purple"));

say "There are $color_count colors in the updated array";

请注意，LIST 是整体添加的，而不是一次添加一个元素，因此添加的元素保持相同的顺序。使用 reverse 执行相反的操作。

从 Perl 5.14 开始，一项实验性功能允许 unshift 采用标量表达式。此实验被认为不成功，并在 Perl 5.24 中被移除。