$ perl new.pl
SV = PV(0x7460) at 0x35cb4
  REFCNT = 1
  FLAGS = (TEMP)
  PV = 0x6330 " \0w.pl\0\0\0\0"\0
  CUR = 10
  LEN = 11