在 Perl 中比较多个字符串 [英] Comparing Multiple Strings In Perl

问题描述

我的代码是这样的:

if ( $var eq "str1" || $var eq "str2" || $var eq "str3" )
{
...
}

有没有办法优化这个.我想要类似的东西:

Is there anyways to optimize this. I want something like:

if ( $var eq ["str1" || "str2" || "str3"] ) {...}

推荐答案

根据字符串的内容，使用正则表达式非常方便:

Depending on the contents of the strings, a regex is quite convenient:

if ($var =~ /^(str1|str2|str3)$/) { … }

否则，您可以对列表进行 grep:

Failing that, you can grep over a list:

if (grep { $var eq $_ } qw{str1 str2 str3}) { … }

这篇关于在 Perl 中比较多个字符串的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！