in reply to Deleting trailing 0's after using sprintf
$percent_change =~ s/(\.\d\d(?>[1-9]?))\d+/$1/ [download]
$percent_change =~ s/(\.\d(?>[1-9]{0,2}))\d+/$1/ [download]