Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re: What data structure is this code looking for

by wfsp (Abbot)
on Nov 15, 2011 at 15:21 UTC ( [id://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.

        --MidLifeXis

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://938197]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others having a coffee break in the Monastery: (4)
As of 2024-04-26 05:54 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found