Select Code to Download

% perl -MO=Deparse,-p -ce '($x) ? $z  = "true" : $z  = "false";'
(($x ? ($z = "true") : $z) = "false");
-e syntax OK
%

% perl -wle '$x = 1; $x ? ($z = "true") : ($z = "false"); print $z'
true
...
% perl -wle '$x = 1; $z = $x ? "true" : "false"; print $z'
true
%