REBOL[]while[a: input][print a print a]