Help for this page

Select Code to Download


  1. or download this
    $ perl -wl \
    ? -e 'use charnames ":full";' \
    ? -e 'use Data::Peek qw(triplevar DDump);' \
    ...
      PV = 0x7773e0 "\317\200"\0 [UTF8 "\x{3c0}"]
      CUR = 2
      LEN = 8
    
  2. or download this
    perl -MData::Peek=triplevar,DDump -wle'DDump (triplevar ("\x{3c0}", 3,
    + 3.1415))'
    SV = PVNV(0x11d8f20) at 0x74b0e0
      REFCNT = 1
    ...
      PV = 0x75b470 "\317\200"\0 [UTF8 "\x{3c0}"]
      CUR = 2
      LEN = 8