Re: Counting & arrays

[JupiterHost.Net]

for my $action (keys %actionrule) {
     print "Action is: $action\n";
     for my $rule (keys %{ $actionrule{$action} }) {
         print "\tRule is: $rule\n";
         print "\t\tand its count is: $actionrule{$action}{$rule}\n";
     }
}



THANK YOU!!

This works beautifully!  I was pulling my hair out.

Great, Perl programmers are only bald from genetics ;)

Thanks again

np Mike :)

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>