在Perl的~~对面

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

导读：在Perl中操作符是否存在相反的情况？我用它来匹配数组中的元素,如下所示： my @arr = qw /hello ma duhs udsyyd hjgdsh/;print "is inn" if ('duhs' ~~ @arr); 这个打印是.非常酷,因为我不必迭代所有数组并比较每个记录.我的问题是,如果我没有匹配,我想做点

在Perl中操作符是否存在相反的情况？我用它来匹配数组中的元素,如下所示：

my @arr = qw /hello ma duhs udsyyd hjgdsh/;
print "is inn" if ('duhs' ~~ @arr);

这个打印是.非常酷,因为我不必迭代所有数组并比较每个记录.我的问题是,如果我没有匹配,我想做点什么.我可以去另一边,但我宁愿找到相反的“~~”

解决方法

除非==如果没有

print "is not inn" unless ('duhs' ~~ @arr);

注意：智能匹配在perl 5.18中是实验性的.请参阅Smart matching is experimental/depreciated in 5.18 – recommendations?所以请改用以下内容：

print "is not inn" unless grep { $_ eq 'duhs' } @arr;

（编辑：李大同）

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