(loop(#1=format t"~{~A~^ ~}
"(regexp:regexp-split",*[ -]\\(and \\)*"(#1#*"~R"(read)))))