如何在 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”