Select Code to Download

Select or download this

my %h1 = ( k1 => "v1"  );
my %h2 = ( k2 => \%h1  );
...
                               | k1 => | Str "v1" | |
                               |       +----------+ |
                               +--------------------+

Select or download this

my %h4;

...
                               | k1 => | Str "v1" | |
                               |       +----------+ |
                               +--------------------+

Select or download this

%h4 = %h3;

...
                               | k1 => | Str "v1" | |
                               |       +----------+ |
                               +--------------------+

Select or download this

$h3{k3}{k2}{k1} = "v2";

...
                               | k1 => | Str "v2" | |
                               |       +----------+ |
                               +--------------------+

Select or download this

         %h3
+--------------------+
...
                               | k1 => | Str "v1" | |
                               |       +----------+ |
                               +--------------------+