title: How can one print values of nested hashes in Perl?
body: <pre><code>$dict{'one'}=1;
  print %dict;
  </code></pre>
  
  <p>This will print </p>
  
  <blockquote>
    <p>one1</p>
  </blockquote>
  
  <p>to the terminal. But what if my code has a <s>dictionary</s> hash in a <s>dictionary</s> hash like this:</p>
  
  <pre><code>my %dict;
  $dict{'1'}{'1'}=2;
  
  print %dict;
  </code></pre>
  
  <p>This gives the output:</p>
  
  <pre><code>1HASH(0xb1db78)
  </code></pre>
  
  <p>Even when I change the last line to </p>
  
  <pre><code>print $dict{'1'};
  </code></pre>
  
  <p>The output is:</p>
  
  <blockquote>
    <p>HASH(0x13ccb78)</p>
  </blockquote>
  
  <p>How can I get the contents of the <s>dictionary</s> hash instead of the reference location?</p>