Help for this page

Select Code to Download


  1. or download this
    $ perl -MDevel::Peek -le 'Dump(17 + (2 ** 56))'
    SV = NV(0x10450940) at 0x10410fd0
      REFCNT = 1
      FLAGS = (PADBUSY,PADTMP,NOK,READONLY,pNOK)
      NV = 7.2057594037928e+16
    
  2. or download this
    $ perl -Minteger -MDevel::Peek -le 'Dump(17 + (2 ** 56))'
    SV = IV(0x10429358) at 0x10410fdc
      REFCNT = 1
      FLAGS = (PADBUSY,PADTMP,IOK,READONLY,pIOK)
      IV = 72057594037927953