s=substr;a=readLines("stdin");for(v in a){for(i in seq(1,nchar(v)-2,2))cat(min(s(v,i,i),s(v,i+1,i+1)));cat(". ")}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page