#!ruby -p0 sub($&){$`=~/(\d)(.{50})?$/m?$1:~-$.+=1}while/#/