如何在Perl中从数组中删除重复项?

173

我在 Perl 中有一个数组:

my @my_array = ("one","two","three","two","three");

如何从数组中删除重复项?

11个回答

0
使用唯一哈希键的概念:
my @array  = ("a","b","c","b","a","d","c","a","d");
my %hash   = map { $_ => 1 } @array;
my @unique = keys %hash;
print "@unique","\n";

输出结果:a c b d


网页内容由stack overflow 提供, 点击上面的
可以查看英文原文,
原文链接