Select Code to Download

%h->{a}->{'foo'}='bar';

print Dumper %h->{a};

$h{a}->{'foo'} = 'bar';
print Dumper $h{a};