REBOL[]while[i: input][print[parse i" "]]