Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation

Re: What data structure is this code looking for

by wfsp (Abbot)
on Nov 15, 2011 at 15:21 UTC ( #938197=note: print w/replies, xml ) Need Help??

in reply to What data structure is this code looking for

A hash of hashes (HoH)
#! /usr/perl/bin use warnings; use strict; use Data::Dumper; my $abc = { one => { oneone => 11, onetwo => 12, }, two => { twoone => 21, twotwo => 22, } }; foreach my $key (keys %{$abc}) { if ( ref $abc->{$key} eq 'HASH' ) { for my $subkey (keys %{$abc->{$key}}){ printf qq{%s -> %s\n}, $subkey, $abc->{$key}{$subkey}; } } }
onetwo -> 12 oneone -> 11 twotwo -> 22 twoone -> 21

Replies are listed 'Best First'.
Re^2: What data structure is this code looking for
by mhearse (Chaplain) on Nov 15, 2011 at 15:52 UTC
    Thanks for the replies. I actually figured this out moments after the post. Is it possible to delete my own posts?
      Nooo! Don't delete it. It's a good question and will be useful for others facing the same problem.
      The post is doing no harm. It might help other users searching on this site for helpful threads. You can edit your posts, but if you remove the text the answers to your post would hang there without meaning

        Additionally, if you do edit your content to a point where the meaning is lost or later posts become nonsensical, there will likely be a consideration request to restore the content.


Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://938197]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (4)
As of 2018-03-23 05:45 GMT
Find Nodes?
    Voting Booth?
    When I think of a mole I think of:

    Results (288 votes). Check out past polls.