Add 1 to all numbers on a string

$str =~ s/(\d+)/$1+1/ge