C:\>perl -MDevel::Peek -le "$x = '1e70' * 1.0; Dump $x;"
SV = NV(0x576440) at 0x576458
  REFCNT = 1
  FLAGS = (NOK,pNOK)
  NV = 1e+70