将制表符分隔的字符串中的值添加到plist

我如何将制表符分隔的字符串中的值添加到plist？

  (dolist (x *lines*)
    (cl-ppcre:split "\t" x))

*lines* 是从文件加载的制表符分隔字符串列表,我想制作表单的plist

(:a value1 :b value2 :c value 3)

谢谢!

(let ((line '("foo" "bar" "baz")))
   (loop for item in line and key in '(:a :b :c) collect key collect item))


=> (:A "foo" :B "bar" :C "baz")


(mapcan 'list '(:a :b :c) '("foo" "bar" "baz"))

=> (:A "foo" :B "bar" :C "baz")