DB<1> @subkeys = qw( foo bar baz )
  DB<2> $hash{ @subkeys } = 5
  DB<3> x \%hash
0  HASH(0x846a000)
   3 => 5