(#(some println(cons(last%)(drop-last%)))(take-while type(repeatedly read-line)))