w{o=o$0}!w,b=w=$0{gsub(/./,FS,b) w="|"w for($(FS=_)=$0;i++