Phân tích cú pháp của Clojure

Question

Tôi không thể tìm thấy bất kỳ thông tin nào về cách phân tích cú pháp tài liệu xml và các thành phần truy cập.

Tôi đã tìm thấy hai cách để phân tích các tài liệu xml

(clojure.zip/xml-zip (clojure.xml/parse file)) 

và

(parse-seq file) 

nhưng tôi có thể dường như tìm thấy bất kỳ thông tin về làm thế nào để xử lý cấu trúc kết quả?

Tệp nguồn đề cập đến truy vấn zip.clj về cách truy vấn kết quả nhưng điều đó dường như cũng bị thiếu.

Answer 1

Giả sử bạn có xml sau đây để phân tích trong tập tin của bạn:

<high-node> 
    <low-node>my text</low-node> 
</high-node> 

bạn nạp clojure.xml:

user=> (use 'clojure.xml) 

khi phân tích cú pháp, xml sẽ có cấu trúc sau:

{:tag :high-node, :attrs nil, :content [{:tag :low-node, :attrs nil, :content ["my text"]}]} 

và sau đó bạn có thể seq qua nội dung của tệp để lấy nội dung thứ e low-node:

user=> (for [x (xml-seq 
       (parse (java.io.File. file))) 
       :when (= :low-node (:tag x))] 
     (first (:content x))) 

("my text") 

Tương tự, nếu bạn muốn có quyền truy cập vào toàn bộ danh sách các thông tin trên nút thấp, bạn sẽ thay đổi :when vị để (= (:high-node (:tag x))):

user=> (for [x (xml-seq 
       (parse (java.io.File. file))) 
       :when (= :high-node (:tag x))] 
     (first (:content x))) 

({:tag :low-node, :attrs nil, :content ["my text"]}) 

này hoạt động vì các từ khóa có thể hoạt động như các hàm. Xem Questions about lists and other stuff in Clojure và Data Structures: Keywords

Answer 2

Câu trả lời ở trên hoạt động nhưng tôi thấy dễ sử dụng hơn clojure.data.zip.xml (trước đây là clojure-contrib.zip-filter.xml trước Clojure 1.3).

file:

myfile.xml:

<songs> 
    <track id="t1"><name>Track one</name></track> 
    <track id="t2"><name>Track two</name></track> 
</songs> 

mã:

; Clojure 1.3 
(ns example 
    (:use [clojure.data.zip.xml :only (attr text xml->)]) ; dep: see below 
    (:require [clojure.xml :as xml] 
      [clojure.zip :as zip])) 

(def xml (xml/parse "myfile.xml")) 
(def zipped (zip/xml-zip xml)) 
(xml-> zipped :track :name text)  ; ("Track one" "Track two") 
(xml-> zipped :track (attr :id))  ; ("t1" "t2") 

Thật không may, bạn cần phải kéo trong một sự phụ thuộc vào data.zip để có được chức năng đọc/lọc đẹp này. Nó có giá trị phụ thuộc :) Trong lein nó sẽ là (tính 17-Aug-2013):

[org.clojure/data.zip "0.1.1"] 

Và như đối với tài liệu cho data.zip.xml ... Tôi chỉ cần nhìn vào các tập tin nguồn tương đối nhỏ here để xem điều gì là có thể. Một câu trả lời SO tốt khác là here.