perl -i -pe 's/(\d+)/($1)+5/eg'