DB<103> @matches = split /(AND|OR)/,$str
 => (
  "",
  "AND",
  " (random text) ",
  "AND",
  " (more random text) ",
  "AND",
  " (yet more)",
)