数组 – 如何在Perl中找到一个数组中的元素而不是另一个数组中的

发布时间：2020-12-15 21:51:10 所属栏目：大数据来源：网络整理

导读：我有两个数组,我想找到一个数组但不是另一个数组的元素：例如： @array1 = ("abc","cde","fgh","ijk","lmn")@array2 = ("abc","lmn") 我需要最终： @array3 = ("cde","ijk") 解决方法将第二个数组的元素放入散列中,以便有效地检查特定元素是否在其中,然后

我有两个数组,我想找到一个数组但不是另一个数组的元素：

例如：

@array1 = ("abc","cde","fgh","ijk","lmn")
@array2 = ("abc","lmn")

我需要最终：

@array3 = ("cde","ijk")

解决方法

将第二个数组的元素放入散列中,以便有效地检查特定元素是否在其中,然后过滤第一个数组以查找那些不在第二个数组中的元素：

my %array2_elements;
@array2_elements{ @array2 } = ();
my @array3 = grep ! exists $array2_elements{$_},@array1;

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!