my $r = if ($foo) then {"bar"} else {"baz"};