write(sub(" $","",gsub(" "," 1 ",gsub("([A-Z][a-z]?)(\\d*)","\\1 \\2 ",scan("stdin","")))),1)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page