Select Code to Download

my $lowest = min values $products_and_prices;

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