Select Code to Download

  DB<1> $h{a}{b}{c} = 2; 
 
...
      'e' => HASH(0x600500980) 
           empty hash 
  DB<5>

print "foo" if $h{g} && $h{g}{h} && exists $h{g}{h}{i};

print "foo" if $h{g} && $h{g}{h} && defined $h{g}{h}{i};