(format t "~{~a~*~}" (coerce (read-line) 'list))