perl - 如何在 perl 中使用给定的 'OR'？

Question

我对 Perl 中的 Given-When 语句很陌生。我想为 $var=0 或 2 得到相同的结果，有什么帮助吗？

我已尝试以下操作，但出现错误。

given($var) {
when(0 || 2) { print "bala";}
when(1) {print "blabla";}
default {print "default";}
}

Answer 1

你可以缩短它:

given($var) {
print "bala" when [0,2];
print "blabla" when [1];
default {print "default"}
}

您的原件无效，因为“0 || 2”的计算结果始终为“2”