Select Code to Download

use warnings;
use strict;
...
}

dd \%hash;

23:43 >perl 1148_SoPW.pl
key is c, value is 13, hash is { a => 11, b => 12, c => 13, d => 14 }
...
key is x, value is cxxxxxxx, hash is { x => "cxxxxxxx" }
key is x, value is cxxxxxxxx, hash is { x => "cxxxxxxxx" }
...