我需要看一下字符串数组中是否存在重复项，最有效的方法是什么？
解决方法
我喜欢Perl的事情之一就是能够像英语一样读书。这只是一种有意义的东西。
use strict;
use warnings;
my @array = qw/yes no maybe true false false perhaps no/;
my %seen;
foreach my $string (@array) {
next unless $seen{$string}++;
print "'$string' is duplicated.\n";
}
产量
'false' is duplicated.
'no' is duplicated.