LIBXML - 如何获取标签的名称？

Question

我有以下内容：

my $string='<entry><name>Bob</name><zip>90210</zip></entry>';

my $parser=XML::LibXML->new(); 
use HTML::Entities;
my $encodedXml=encode_entities($string,'&\'');

my $doc=$parser->parse_string($encodedXml);

foreach my $text($doc->findnodes("//text()")){
print $text->to_literal,"\n";
}

这会打印出“Bob”和“90210”；

如何获取实际的节点名称...我需要一种方法来获取 xml 树中的所有节点...即“名称”和“zip”

Answer 1

文本节点没有名称。也许您想要父母的名字？

我认为这会起作用：

for my $node ($doc->findnodes('//text()')) {
   print $node->parentNode()->nodeName(), ": ", $node->nodeValue(), "\n";
}

我会使用

for my $node ($doc->findnodes('//*[text()]')) {
   print $node->nodeName(), ": ", $node->textContent(), "\n";
}

注意：此较新版本组合了该元素的所有文本子元素，因此如果一个节点具有多个文本子元素，则它是不等效的。不过，它们对你来说应该是等效的。

Answer 2

您的代码所做的就是选择 text 节点，这些节点作为您要查找的节点的子节点存在。文本节点是一个单独的实体，并且没有名称。您需要导航到文本节点的父节点，并且该节点将包含标签名称。

对于同时包含文本和元素节点的混合内容节点，事情会变得更加棘手，例如

<p>Beginning of <i>sentence</i> and now the end</p>

在这种情况下，结构是

<p>
 |
 +---text (Beginning of )
 |
 +---<i>
 |    |
 |    +---text (sentence)
 |
 +---text ( and now the end)