Help for this page

Select Code to Download


  1. or download this
    $ perl -we 'open O, "> /dev/null"; print O (scalar readline)'
    Filehandle O opened only for output at -e line 1.
    Bus Error
    
  2. or download this
    $  perl -we 'open O, "> /dev/null"; print O (scalar readline)'
    Filehandle O opened only for output at -e line 1.
    ...
    
    $ perl -e 'warn readline()'
    Warning: something's wrong at -e line 1.