C:\_32>perl -Mstrict -MDevel::Peek -le "my $arg = \"STDOUT\"; Dump $arg;"

SV = PV(0x36cd1c) at 0x44b124
  REFCNT = 1
  FLAGS = (POK,IsCOW,pPOK)
  PV = 0x451dc4 "STDOUT"\0
  CUR = 6
  LEN = 10
  COW_REFCNT = 1