perl

perl数组去重复的方法是什么

小亿
358
2023-08-10 01:32:18
栏目: 编程语言

在Perl中,可以使用uniq函数来去除数组中的重复元素。

下面是一个简单的示例:

use List::MoreUtils qw(uniq);
my @array = (1, 2, 3, 2, 1, 4, 5, 4);
my @unique_array = uniq(@array);
foreach my $element (@unique_array) {
print "$element ";
}

输出结果为:1 2 3 4 5

在上面的示例中,uniq函数从数组@array中移除重复的元素,并将结果存储在@unique_array数组中。然后,使用循环遍历@unique_array数组并打印每个元素。

0
看了该问题的人还看了