perl -pe's/[1-9]\d*/$&+1/ge'