$h{foo}{bar} = 123;

##</code><code>##

$h{foo}->{bar} = 123; 

##</code><code>##

${ $h{foo} }{bar} = 123; 

##</code><code>##

my %a;
my %b;
$a{foo} = \%b;
$a{foo}{bar} = 123;
print("$b{bar}\n");