Help for this page

Select Code to Download


  1. or download this
    $ perl561 -MO=Deparse -e 'while(1) {1}'
    for (;;) {
        '???';
    }