2

マップのベクトルがあるとしましょう

[{:username "kbee" :firstname "Kay" :lastname "Bee"},
 {:username "jcee" :firstname "Jay" :lastname "Cee"}]

そして、次のように各マップのxmlファイルを生成したい

  <user>
   <username>kbee</username>
   <firstname>Kay</firstname>
   <lastname>Bee</lastname>
  </user>

これを達成するために clojure コア ライブラリだけを使用するにはどうすればよいですか。(エンライブとフリートを見ましたが、私には少し複雑に思えました。)

理想的には、私は次のことをしたいと思います

(map #(spit (str (:username %) ".xml") (gen-xml sometemplate %) map-of-users))
4

1 に答える 1

5

clojure.xml / emit-elementを試しましたか?:

(use 'clojure.xml)
(def v [{:username "kbee" :firstname "Kay" :lastname "Bee"},
        {:username "jcee" :firstname "Jay" :lastname "Cee"}])

(defn to-xml [m] (doseq [[k v] m] 
                  (emit-element {:tag k :content [v]}) ))

REPLで試してみてください:

user> (to-xml (first v))
<username>kbee
</username>
<firstname>Kay
</firstname>
<lastname>Bee
</lastname>
nil

次に必要なのは、to-xmlの内容をユーザータグでラップすることだけです。

于 2012-07-27T16:34:51.897 に答える