$baz = 1 unless $foo and $bar;