my %products;
$products{"Product1"}{"price"}=100;
$products{"Product1"}{"description"}="A worthless widget";

foreach my $product (keys %products) {

     if ($product == $whatevertheuserselected) {
          # do something cool here
          $total =+ $products{$product}{"price"};
          $email_body .= $products{$product}{"description"};

     }

}