Perl XML::LibXML usage

Question

我在使用 XML：：LibXML 时遇到了一些问题，我想知道是否有办法做我想做的事情，或者我的 XML 是否应该更改。

目前，我的XML看起来像：

<fftg>
<actions>
<rename>
<mandatory>0</mandatory>
<other_things_here />
</rename>
<transfer>
<mandatory>0</mandatory>
<protocol>SFTP</protocol>
<other_things_here />
</transfer>
<transfer>
<mandatory>1</mandatory>
<protocol>FTP</protocol>
<other_things_here />
</transfer>
<archive>
<mandatory>1</mandatory>
<other_things_here />
</archive>
<rename>
<mandatory>1</mandatory>
<other_things_here />
</rename>
</actions>
</fftg>

如您所见，在"操作"下，可以有不同类型的操作(每种操作有 1 个或多个操作，每个操作下有不同的内容)

我想浏览每个操作并根据操作执行特定操作。

我的问题是：由于有多个相同类型的操作，脚本无法正常工作并覆盖先前的相同类型的操作，或者特定操作上的循环在相同类型的每个操作上重新循环

示例 1 ：

foreach my $transfer ($doc->findnodes('/fftg')) {
# Browse Actions
foreach my $action ($doc->findnodes('/fftg/actions/*')) {
my $action_name = $action->nodeName();
my $actiontype = ucfirst($action->nodeName());
print "executing action $action_name ..n";
# Browse action details
foreach my $action_details ($doc->findnodes('/fftg/actions/'.$action_name)) {
for my $detail ($action_details->findnodes('./*')) {
print $detail->nodeName(), ": ", $detail->textContent(), "n";
}
}
print "-------------n";
}
}

结果 1 ：

executing action rename ..
mandatory: 0
other_things_here:
mandatory: 1
other_things_here:
-------------
executing action transfer ..
mandatory: 0
protocol: SFTP
other_things_here:
mandatory: 1
protocol: FTP
other_things_here:
-------------
executing action transfer ..
mandatory: 0
protocol: SFTP
other_things_here:
mandatory: 1
protocol: FTP
other_things_here:
-------------
executing action archive ..
mandatory: 1
other_things_here:
-------------
executing action rename ..
mandatory: 0
other_things_here:
mandatory: 1
other_things_here:
-------------

如您所见，此结果是错误的，因为在每个"操作类型"(很好，检测到)中，它会重新循环每个相同类型的操作。

这是由于 ：

foreach my $action_details ($doc->findnodes('/fftg/actions/'.$action_name)) {

我该怎么做才能实现我想要实现的目标？(如果可能，无需更改 XML)

我想要的是：

executing action rename ..
mandatory: 0
other_things_here:
-------------
executing action transfer ..
mandatory: 0
protocol: SFTP
other_things_here:
-------------
executing action transfer ..
mandatory: 1
protocol: FTP
other_things_here:
-------------
executing action archive ..
mandatory: 1
other_things_here:
-------------
executing action rename ..
mandatory: 1
other_things_here:
-------------

谢谢

附带说明一下，我想我可以更改我的 XML 并使用类似的东西来轻松修复它(但我不知道哪一个是三者之间的最佳选择)，但我想避免下面这两个，因为 XSD 之后很难生成(我希望每种操作类型的特定选项)：

<fftg>
<actions>
<action>
<type>rename</type>
<mandatory>0</mandatory>
<other_things_here />
</action>
<action>
<type>transfer</type>
<mandatory>0</mandatory>
<protocol>SFTP</protocol>
<other_things_here />
<action>
<action>
<type>transfer</type>
<mandatory>0</mandatory>
<protocol>FTP</protocol>
<other_things_here />
<action>
<action>
<type>archive</type>
<mandatory>0</mandatory>
<other_things_here />
<action>
<action>
<type>rename</type>
<mandatory>0</mandatory>
<other_things_here />
<action>

</actions>
</fftg>

或

<fftg>
<actions>
<action type="rename">
<mandatory>0</mandatory>
<other_things_here />
</action>
<action type="transfer">
<mandatory>0</mandatory>
<protocol>SFTP</protocol>
<other_things_here />
<action>
<action type="transfer">
<mandatory>0</mandatory>
<protocol>FTP</protocol>
<other_things_here />
<action>
<action type="archive">
<mandatory>0</mandatory>
<other_things_here />
<action>
<action type="rename">
<mandatory>0</mandatory>
<other_things_here />
<action>

</actions>
</fftg>

再次感谢 问候

Answer 1

首先，在$doc上调用 findnodes，这意味着您的 XPath 表达式是针对文档根节点计算的。其次，您使用的 XPath 表达式以"/"开头，因此该表达式再次植根于顶级节点。因此，当您致电：

$doc->findnodes('/fftg/actions/rename')

它的意思是"给我每个<rename/>元素，该元素是<actions/>元素的子元素<fftg/>该元素是文档的根节点"，因此，您将获得在文档中找到的每个<rename/>节点。

而且，循环太多了。第一个是多余的，因为可能只有一个根元素。两个循环应该有效(一个在<action/>子项上，另一个在他们的子项上)：

for my $action ($doc->findnodes('/fftg/actions/*')) {
print "executing ", $action->nodeName(), "n";
for my $detail ($action->findnodes('./*')) {
print $detail->nodeName(), ": ", $detail->textContent(), "n";
}
}