alternating case lines by pooq

-module a.
-export[m/0].
m()->S=string,[io:format("~s~s",[S:to_upper(io:get_line('')),S:to_lower(io:get_line(''))])||A<-lists:seq(1,14)].

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

download

return to the top page