cat(gsub("(.)\\1+","\\1",readChar("stdin",999)))