http://qs321.pair.com?node_id=75058

tevads has asked for the wisdom of the Perl Monks concerning the following question:

I have created a multi level hash : $pnl_ind{$symbol_set}->{$symbol}->{'pnl'} I want to sort 1st by $symbol_set then by 'pnl' then by $symbol. I have tried this:
foreach my $symbol_set (sort keys %pnl_ind) { my $symbols_r=$pnl_ind{$symbol_set); foreach my $symbol (sort ($a->{'pnl'}<=>$b->{'pnl'})%$symbols_r ) +{ ... etc
This only sorts by symbol_set and not by 'pnl'. Anybody have any ideas or who could provide code to solve this. Thanks tevads