You've got a few problems, not the least of which is that your datastructure isn't a nested hash of hashes. It's a hash of lists of hashes, or something wierd like that. Use Data::Dumper to view the datastructure first to see how it doesn't match what you're trying to print.

You should also construct your map statement like this:

print map "$_ = $ref->{$_}\n", sort keys %{$ref};

Note the $ref->{$_} construct. You have to dereference the hashref $ref.

Here's code that works. It's sloppy because you're still not using strict, not using warnings, formatting is all over the place, etc. But it does what you're after: 

my %Recipes = (
"YumYumStuff" => {
    ingredients => {
        1 => "1 Pate a Bombe",
        2 => "1/2 French Meringue",
        3 => "300ml double cream",
        4 => "3 very ripe bananas",
        5 => "2 tablespoons Creme de Banane",
        6 => "1 Bitter Chocolate Sorbet",
    },
    instructions => { 
        1 => "Whisk together the pate a bombe and the French Meringue 
+mixtures.  They should be roughly equal in amounts by volume.",
        2 => "Lightly whip the cream to the same consistency as the pa
+te de bombe and French Meringue mixture then mix both mixtures togeth
+er",
        3 => "Finally, whisk in the banana puree and liquer.  Pour or 
+pipe into ramekins, a long loaf tin or a large freezer container. ",
        4 => "About 30 mins before serving, transfer the parfait from 
+the freezer to the refrigerator",
    }
} );
                    

for $recipe (keys %Recipes) {
    print "For $recipe the ingredients are :\n";
            $ref = $Recipes{$recipe}{ingredients};
            print map "$_ = $ref->{$_}\n",  sort keys %{$ref};
        }

[download]

Dave

In reply to Re: How do I print nested hashes by davido
in thread How do I print nested hashes by blueapache

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.