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