Help for this page

Select Code to Download


  1. or download this
    Perl> use Devel::Peek;;
Perl> $x = 2**1025;;
...
  REFCNT = 1
  FLAGS = (NOK,pNOK)
  NV = 1.#INF
  2. or download this
    $y = $x / $x;;
Dump $y;;
...
  REFCNT = 1
  FLAGS = (NOK,pNOK)
  NV = -1.#IND