{while(/ # /)$0=gensub(/( # *) /,"\\1.",1)}1