在 perl xpath find 语句中使用变量

Question

好吧，我一直在四处寻找，似乎找不到我的问题的答案。我正在使用 Perl 通过 XPATH 解析 XML 文件。文件的一部分，我不知道子节点将被命名为什么。例如：

<state xmlns="http://google.com" id=1>
  <randomName1 type="boolean">0</randomName1>
</state>
<state xmlns="http://google.com" id=2>
  <randomName2 type="boolean">1</randomName2>
</state>

因此，对于每个 randomName，我需要通过执行以下代码来获取我能够获取的名称（注意：我在父 foreach 语句中获取节点列表）。

my $elements = $nodes->getChildNodes;

foreach my $element(@$elements)
{
my $name = (lc($element->getName))
}

当我尝试获取值时，我的问题出现了，我尝试将 my $value = $element->string_value; 放入 foreach 循环中，而所做的只是返回 0，无论姓名。我还尝试在 xpath string_value 语句中放置一个变量，但没有成功。

有没有办法将变量放入 xpath 表达式中？类似于（注意：这不起作用）我的 $value = $element->find('$name')->string_value;？

抱歉，如果不清楚，我会尝试回答任何问题，但我们将不胜感激任何帮助，我已经花了更多时间来尝试解决这个问题。

Answer 1

问题是，如果文档位于默认命名空间中，则仅在位置步骤中使用元素名称将不会选择任何内容，因为 XPath 将所有无前缀的名称视为“无命名空间”。 这是XPath中最常见的FAQ。只需搜索“XPath默认命名空间”即可获得答案。

有两种解决方案：

1. 在类似“NamespaceManager”的对象中注册命名空间，然后然后在 XPath 表达式中使用前缀。

2. 使用如下位置步骤：*[name()='someName']

Answer 2

我建议使用 XML::XPath 模块：

use XML::XPath;
use XML::XPath::XMLParser;

my $xp = XML::XPath->new(filename => 'test.xml');
my $nodeset = $xp->find('/states/state/*'); # find all subnodes

foreach my $node ($nodeset->get_nodelist) {
    print "FOUND: ", XML::XPath::XMLParser::as_string($node), "\n";
}

在这个示例 XML 文件中：

<?xml version="1.0"?>

<states>
<state xmlns="http://google.com" id="1">
  <randomName1 type="boolean">0</randomName1>
</state>
<state xmlns="http://google.com" id="2">
  <randomName2 type="boolean">1</randomName2>
</state>
</states>

这段代码打印：

FOUND: <randomName1 type="boolean">0</randomName1>
FOUND: <randomName2 type="boolean">1</randomName2>

perl+cpan 太棒了！

Answer 3

通过将 g 前缀绑定到 http://google.com 命名空间 URI，您可以使用此表达式来选择 state 的任何元素子元素：

//g:state/*

< strong>注意：如果您知道架构不以 // 运算符开始路径，请使用完整路径。

更新：获取每个选定节点的字符串值不是XPath问题，而是宿主语言DOM方法问题。

Answer 4

感谢所有写回复的人，事实证明我只是一个白痴。在我调用子例程的方式中，它只是在每个其他集合上正确传递变量，因此 my $value = $element->string_value; 正在完成它的工作并仅返回 0，因为值为 1 的集合将被忽略。

我很抱歉浪费了任何人的时间……这不是我想给 stackoverflow 社区留下的第一印象，但再次感谢您的回复。