Re^5: processing key value pairs of a hash

in reply to Re^4: processing key value pairs of a hash
in thread processing key value pairs of a hash

untested...

for (keys %clone_hash) {
    my $gcnt = (exists $clone_hash{$_}{good}) ? $clone_hash{$_}{good} 
+: 0;
    my $bcnt = (exists $clone_hash{$_}{bad} ) ? $clone_hash{$_}{bad}  
+: 0;
    print $out "$_\t$gcnt\t$bcnt";
}
[download]

Update: removed erroneous "exists"

Comment on Re^5: processing key value pairs of a hash Download Code

Replies are listed 'Best First'.
Re^6: processing key value pairs of a hash by lomSpace (Scribe) on Apr 16, 2009 at 13:28 UTC
Hi toolic! That was simple enough! Thanks for the introduction to hash of hashes. Thanks! LomSpace	[reply]

In Section Seekers of Perl Wisdom