in reply to Re: Finding hashes in hashes of hashes
in thread Finding hashes in hashes of hashes
Thanks for you answer. It solves my problem!
No, it is not my homework (got something else). I'm just trying to create a script where I need something similar (no families and no flinstones ;). I didn't want to write the full code, since I only need this in a single sub.
I am using strict, warnings, diagnostics and even perlcritic (cruel).
I played around with something like this:
but where would I say, it should die, when 'bart' is not found? It has been a while since I used perl the last time. I returned, because I missed the nice community and CPAN. However, since I used some more exotic languages (far away from C-like styles and paradigms) I guess I need to rewire my brain. I hope I remember correctly, how Perls scopes and datatypes work. Maybe I should just try to find my old perl books.get_family_member('bart',$families); sub get_family_member { my @args = @_; my $who = shift @args; my $families = shift @args; foreach my $family (%families) { if ($families->{$family}->{kid} eq "bart") { return $dfamilies->{$family}->{kid}; last; } } }
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^3: Finding hashes in hashes of hashes
by bobf (Monsignor) on Dec 28, 2009 at 18:49 UTC | |
by AnomalousMonk (Archbishop) on Dec 28, 2009 at 20:07 UTC | |
by cyphy (Initiate) on Dec 29, 2009 at 14:26 UTC |
In Section
Seekers of Perl Wisdom