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