Haskell HXT解析条件

Question

我正在尝试解析这个xml：

...
<member>
  <name>id</name>
  <value>
    <string>1</string>
  </value>
</member>
<member>
  <name>description</name>
  <value>
    <string>sdfsdfsdf</string>
  </value>
</member>
...

如何只解析带有从属"name"-tag = "id“的"”标签？

我试过了：

getroot = multi ( ( getChildren >>> hasName "name" >>> hasText "id") `guards` (isElem >>> hasName "member"  ) ) 

main = do
print <- runX (parseXML "test2.xml" >>> getroot >>> putXmlTree "-")

Answer 1

当您使用过滤器hasName "name"时，您将获得<name>标记。该节点本身不是文本节点，因此hasText "id"失败。这里有一个似乎有效的修改：(我还必须更改hasText的参数类型，可能是HXT的一个不同版本)

import Text.XML.HXT.Core

getroot = multi ( ( getChildren >>> hasName "name" >>> getChildren >>> hasText (=="id")) 
                   `guards` (isElem >>> hasName "member"  ) ) 

main = do
    runX (readDocument [] "test2.xml" >>> getroot >>> putXmlTree "-")

我不是HXT专家，所以可能有更好的方法来做你想做的事情。