Help for this page

Select Code to Download


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