rebol[]while[a: input][if #"h"= a/1[remove a]print a]