Select Code to Download

  DB<103> @hash{$_} = {x=>$x++,y=>$x++} for a..h
 => ""
...
d - y -23
d - x -22
... # and so on

  DB<106> print Dumper \%hash
$VAR1 = {
...
                   'x' => 4
                 },
...

  DB<106> use YAML::Tiny
 => 0
...
  x: 22
  y: 23
...