Сортировка в ХЭШе ?(+)

Помогите, плиз, как отсортировать данные в ХЕШе по values?

[dimfish]

Код: [Выделить]


foreach $food (sort { $food_color{$a} cmp $food_color{$b} }
                keys %food_color)
{
    print "$food is $food_color{$food}.\\n";
}


[Haze]

foreach (sort values %hash) {}