在Perl中操作符是否存在相反的情况?我用它来匹配数组中的元素,如下所示:
my @arr = qw /hello ma duhs udsyyd hjgdsh/; print "is in\n" if ('duhs' ~~ @arr);
这个打印是.非常酷,因为我不必迭代所有数组并比较每个记录.我的问题是,如果我没有匹配,我想做点什么.我可以去另一边,但我宁愿找到相反的“~~”
解决方法
除非==如果没有
print "is not in\n" unless ('duhs' ~~ @arr);
注意:智能匹配在perl 5.18中是实验性的.请参阅Smart matching is experimental/depreciated in 5.18 – recommendations?所以请改用以下内容:
print "is not in\n" unless grep { $_ eq 'duhs' } @arr;
原文地址:https://www.jb51.cc/Perl/171754.html
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。