Select Code to Download

use strict;
use warnings;
...
print "after:\n";

Dump \%hash;

before:
SV = IV(0x1e5cca8) at 0x1e5ccb8
...
      PV = 0x1e98b90 "1"\0
      CUR = 1
      LEN = 16