Help for this page
print $foo ? "True\n" : "False\n";
print do { if ($foo) { "True\n" } else { "False\n" } };