[Perl-unix-users] dereferencing hash of hashes

[listmail]

With this new structure, how would I dereference the hash to return the text 
value instead of the hash reference?

use strict;

my %INST= (
  DEV => {
       fullname    => "DEVELOPMENT",
       dbhost      => { "erpd3"     => {
                            sshcon  => "",
                                   },
                      },
       webhost     => { "devapps1"  => {
                            sshcon  => "",
                                      },
                      },
       numweb      => 1,
       version     => "8.1.7",
  },
);

print $INST{DEV}{dbhost};
# returns HASH(0x2254cc)



_______________________________________________
Perl-Unix-Users mailing list
Perl-Unix-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs