C:\>perl -MDevel::Peek -e "$x=42.0; int $x; qq/$x/; Dump $x"
SV = PVNV(0x38bb4) at 0xd2227c
  REFCNT = 1
  FLAGS = (IOK,NOK,POK,pIOK,pNOK,pPOK)
  IV = 42
  NV = 42
  PV = 0xd162ac "42"\0
  CUR = 2
  LEN = 10