Update:$entry{$table}{A}{RANK} = R#3; $entry{$table}{C}{RANK} = R#2; $entry{$table}{B}{RANK} = R#1; @array = map { $_->[0] } sort { $b->[1] cmp $a->[1] } map { [ $_, $entry{$table}{$_}{RANK} ] } keys %{$entry{$table}}; print ">> @array <<\n"; __END__ >> A C B <<
--
Marco Antonio
Rio-PM
In reply to Re: sort question
by mda2
in thread sort question
by rvosa
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |