推荐答案
在 Perl 中，数组的常用函数包括：
push：将元素添加到数组的末尾。pop：移除并返回数组的最后一个元素。shift：移除并返回数组的第一个元素。unshift：将元素添加到数组的开头。splice：在数组中插入、删除或替换元素。sort：对数组进行排序。reverse：反转数组中的元素顺序。join：将数组元素连接成一个字符串。split：将字符串分割成数组。grep：根据条件过滤数组中的元素。map：对数组中的每个元素应用一个操作。
本题详细解读
push
push 函数用于将一个或多个元素添加到数组的末尾。例如：
my @array = (1, 2, 3); push @array, 4; # @array 现在为 (1, 2, 3, 4)
pop
pop 函数用于移除并返回数组的最后一个元素。例如：
my @array = (1, 2, 3); my $last_element = pop @array; # $last_element 为 3，@array 现在为 (1, 2)
shift
shift 函数用于移除并返回数组的第一个元素。例如：
my @array = (1, 2, 3); my $first_element = shift @array; # $first_element 为 1，@array 现在为 (2, 3)
unshift
unshift 函数用于将一个或多个元素添加到数组的开头。例如：
my @array = (1, 2, 3); unshift @array, 0; # @array 现在为 (0, 1, 2, 3)
splice
splice 函数用于在数组中插入、删除或替换元素。例如：
my @array = (1, 2, 3, 4); splice @array, 1, 2, (5, 6); # @array 现在为 (1, 5, 6, 4)
sort
sort 函数用于对数组进行排序。例如：
my @array = (3, 1, 4, 2); my @sorted_array = sort @array; # @sorted_array 现在为 (1, 2, 3, 4)
reverse
reverse 函数用于反转数组中的元素顺序。例如：
my @array = (1, 2, 3); my @reversed_array = reverse @array; # @reversed_array 现在为 (3, 2, 1)
join
join 函数用于将数组元素连接成一个字符串。例如：
my @array = ('a', 'b', 'c');
my $string = join '-', @array; # $string 现在为 'a-b-c'split
split 函数用于将字符串分割成数组。例如：
my $string = 'a-b-c';
my @array = split '-', $string; # @array 现在为 ('a', 'b', 'c')grep
grep 函数用于根据条件过滤数组中的元素。例如：
my @array = (1, 2, 3, 4);
my @filtered_array = grep { $_ > 2 } @array; # @filtered_array 现在为 (3, 4)map
map 函数用于对数组中的每个元素应用一个操作。例如：
my @array = (1, 2, 3);
my @mapped_array = map { $_ * 2 } @array; # @mapped_array 现在为 (2, 4, 6)