perl -MData::Peek=triplevar,DDump -wle'DDump (triplevar ("\x{3c0}", 3, 3.1415))'
SV = PVNV(0x11d8f20) at 0x74b0e0
  REFCNT = 1
  FLAGS = (IOK,NOK,POK,pIOK,pNOK,pPOK,UTF8)
  IV = 3
  NV = 3.1415
  PV = 0x75b470 "\317\200"\0 [UTF8 "\x{3c0}"]
  CUR = 2
  LEN = 8