var s=" "
for(c<-s*50;t=readLine.toUpperCase diff" "replaceAll("(.{6}).*(\\....).*","$1~%d$2\n"))printf(t,s split t size,s+=t+c)