#!perl -p
s/[1-9]\d*/$&+1/ge