(while(#(when-let[l(%)](println l)(%))read-line))