my $ref = { foo => $bar => 'baz' };
  printf "%s\n", $ref->{'foo'}{$bar};