操作符有没有perl?

前端之家收集整理的这篇文章主要介绍了操作符有没有perl?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
假设我有一个数组,我想确保所有这些都属于一个集合(x,y,z),我正在检查以下评估结果为0:
scalar ( grep { $_ ne x && $_ ne y && $_ ne z } @arr )

只是想知道如果我们在perl中有“IN”和“NOT IN”类似sql的操作符,这不会更容易

scalar ( grep { $_ NOT IN (x,z) } @arr )

还是有一个已经?

谢谢,
三位一体

解决方法

解决这个问题的一个典型方法是使用哈希:
my %set = map {$_ => 1} qw( x y z ); # add x,y and z to the hash as keys
                                     # each with a value of 1

my @not_in_set = grep {not $set{$_}} @arr;
原文链接:https://www.f2er.com/Perl/172792.html

猜你在找的Perl相关文章