Select Code to Download

#!/usr/bin/perl

...
        ->Indent(1)
        ->Dump
);

> ./create-nested-hash.pl foo/bar/baz=10 spam/eggs/ham=hi foo/stuff=20
+ top='Tophat!'
...
    "stuff" => 20
  }
}