my $x = (($tap - $min) * ($new_max - $new_min + 5) / ($max - $min));
#                                             ^^^