capital and small letters by ksk

Scanf.scanf"%s%n"(fun t j->let rec($)s i=i<0&s$(print_endline s;j-2);s.[i]<-Obj.magic(lxor)s.[i]32;s.[i]<'_'&s$i-1;s=t||s$ -1in""^t$ -1)

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page