(defn ids [text]
  (map last
       (re-seq #"@(\w+)"
               (first (re-find #"^(to )?(<@\w+\|[\w ]+>(?:(,| and) )?)+" text)))))