我写了一些代码，尝试通过将列表转换为哈希，然后使用该哈希的键作为元素来使列表成员唯一。这在 Perl 5.18 中毫无问题地运行，但现在在 Perl 5.26 中失败了：
@a = keys { map { $_ => undef } @a }
错误信息如下
Experimental keys on scalar is now forbidden at ...
Type of arg 1 to keys must be hash or array (not anonymous hash ({})) at ...
我想避免为此目的创建临时哈希变量。
在 perlfaq4如何从列表或数组中删除重复元素？中有一个解决方案，但它使用了一个单独的临时变量：
my %hash = map { $_, 1 } @array;
# or a hash slice: @hash{ @array } = ();
# or a foreach: $hash{$_} = 1 foreach ( @array );
my @unique = keys %hash;
#...
my %seen = ();
my @unique = grep { ! $seen{ $_ }++ } @array;