REBOL[]loop 23[if(s: input)= sort copy s[print s]]