$running_total =~ s/(\d{1,5}?)0*$/$1/;

##</code><code>##

$running_total = $1 if $running_total =~ /(\d{1,5}?)0*$/;