/prog/ challenge 2009: tskbot

Create a program which accepts a string on stdin, and outputs to stdout either the string ``tsk'', or an empty string. The formar case happens when the input string contains the substring ``nigger'' (case-insensitive). The latter happens in other cases.

Shortest program wins. You have 7*24 hours from the timestamp of this poast. Good luck!

(when (re-find #"(?i)nigger" (slurp *in*)) (println "tsk"))