Select Code to Download

>perl -le"$_=4; while (--$_) { print }"
3
2
1

>perl -e"print 0" | perl -le"while ($_ = <>) { print $_ ? 'true' : 'fa
+lse' }"
false
...
    ();
}
-e syntax OK