#!perl -p
s/0?\K\d+/$&+1/eg