Fill in the blanks by pooq

r:?read\-line;c:charlist;a:c(r());n:0;while(b:r(?-,?-,~))#~do(for v in c(b)do?princ(if v="_"then a[n:n+1]else v),newline());

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

download

return to the top page