I was doing that way before posting here and sorted that with the value:
something like this:
foreach my $pri(sort {$prior{$a} <=> $prior{$b}} keys
%prior)
print $pri, $prior{$pri}, "\n";
where 'prior' is the hash and I had them getting sorted if I print them right after sorting. But after getting the data from the database I would like to get them in the same order as I have initialized them in the hash/array. My problem is to get them sorted in the net report I am going to print by the priority. Also, I have two different sets of disease with the same disease repeating in both the sets.
As in your suggestion, you mean @sorted as a new array which sorts by priority of the array obtained from the database? Could any one make me clear whether I have understand the point clearly?
once again,Thanks for your suggestions