my %f = 1 .. 4;
 my $o = %f;
die $o;
__END__
2/8 at - line 3.


##</code><code>##

my %HOH = (
    1 => {
        key1 => 'value1',
        key2 => 'value2',
        key3 => 'value3',
    },
    2 => {
        key1 => 'value1',
        key2 => 'value2',
        key3 => 'value3',
    },
);