until[eof?][apply[(pr ?(if member? "r ?["eat]["boo]))]rl]bye