my $foo = 0; $foo = $bar if $baz;