于 2011-3-21 13:33, Jim Gibson 写道:
Iterate over the result:

   for my $cell ( sort keys %sum ) {
     for my $sect ( sort keys %{$sum{$cell}} ) {
       for my $chan ( sort keys %{$sum{$cell}{$sect}} ) {
           print "Value of sum($cell,$sect,$chan) is
$sum{$cell}{$sect}{$chan}\n";
       }
     }
   }


And Data::Dumper could help you find out the complicated data structure.

terry.

--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to