Create hash-of-hashes.pl

sample perl to create hash of hashes