$ perl -E '$a = 77; if (($a == 3) || ($a == 77) || ($a == 8)) { say "is" } else { say "not" }' is $ perl -E '$a = 77; if (!(($a == 3) || ($a == 77) || ($a == 8))) { say "not" } else { say "is" }' is