Help for this page

Select Code to Download


  1. or download this
    $ perl -MDevel::Peek -e'Dump(1 < 2)'
    SV = PVNV(0xa1046e4) at 0xa102520
    ...
      PV = 0x947a6c8 ""\0
      CUR = 0
      LEN = 12
    
  2. or download this
    $ perl -e'$x = \(1 < 2); $$x++'
    Modification of a read-only value attempted at -e line 1.