如何解析Rebol中的層次結構？

Question

我已經重讀了第http://www.rebol.com/docs/core23/rebolcore-15.html這個章節，並且解析不了這種分層結構：這有可能嗎？

<Multipage> 
<tab id=1> 
    <box id=1> 
    </box> 
</tab> 
<tab id=2> 
    <box id=2> 
    Hello 
    </box> 
</tab> 
<tab> 
</tab> 
<tab> 
</tab> 
</Multipage> 

Answer 1

是的，它是可能的，不是很辛苦：

data: {...} 

ws-chars: charset " ^/^M^-" 
ws: [any ws-chars] 

rule: [ 
    ws <Multipage> any [ 
     ws "<tab" opt [ws "id=" copy id to ">" (print ["tab id:" id])] ">" any [ 
      ws "<box" opt [ws "id=" copy value to ">" (print ["box id:" id])] ">" 
       opt [copy text to "<" (if text [?? text])] 
      </box> 
     ] 
     ws </tab> 
    ] 
    ws </Multipage> ws 
] 

parse/all data rule 

運行這段代碼，你會得到作爲輸出：

tab id: "1" 
box id: "1" 
text: "^/ " 
tab id: "2" 
box id: "2" 
text: "^/ Hello^/ " 

Answer 2

在http://www.rebol.org/view-script.r?script=xml-parse.r1加文·麥肯齊的XML的解析腳本會解析大多數XML數據。由於這是一個通用的解決方案，因此比特定XML文件的一組解析規則更爲複雜。