(do((='("")))(#f)(dolist(w(string-split(read-line)#\ ))(or(member w =)(print(car(push! = w))))))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page