Select Code to Download

friday:~ $ perl -MO=Deparse,-p -e '1 while $x = $y != $z'
-e syntax OK
'???' while ($x = ($y != $z));