Help for this page

Select Code to Download


  1. or download this
    $ perl -MO=Concise,-exec -e'for (;;) { f() }'
    1  <0> enter 
    ...
          <( perl -MO=Concise,-exec -e'for (;;)  { f() }' 2>&1 ) \
       && echo same
    same