Select Code to Download

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

  use Util::H2O qw/h2o/;
  my $ref = h2o -recurse, { foo => $bar => 'herp' };
  printf "%s\n", $ref->foo->$bar;