s=readChar("stdin",1e3);for(n in 0:99)s=sub("(.)
?(T.*)_","\\2\\1",s);cat(s)