But note that:

print $foo ? "True\n" : "False\n";
[download]

is the same as

print do
{
   if ($foo) { "True\n" } else { "False\n" }
};
[download]

See do.