FS=RS{for(gsub("[1-9][0-9]*",RS"&");sub(RS$2*1,$2+1);)}1