Help for this page

Select Code to Download

Select or download this

   use Data::Peek;
   my %hash = ( boo => [ 1..3 ], blah => "ab\nc\x{20ac}" );
...
   DDump_IO ($fh, \%hash, 6);
   close $fh;
   print $dump;

Select or download this

SV = RV(0x8804c8) at 0x8804b8
  REFCNT = 1
...
                  REFCNT = 1
                  FLAGS = (IOK,pIOK)
                  IV = 3