kennethk, I was getting 'Not a Hash Reference' with that sort method, I have updated my code with a sample data structure. Sorry again. UPDATE: With your method slightly modified, I got it:

my ($lowest) = sort {$products_and_prices->{$a} <=> $products_and_pric
+es->{$b}} keys @{$products_and_prices}[0];
[download]