xml - 如何使用 XPath 和 Perl 检索属性

Question

我有以下 XML 结构:

<RECORD>
<TYPE ID="check_ping">
<HOSTS>
<HOST H="192.168.0.1" W="50,1%" C="100,1%" />
<HOST H="192.168.0.2" W="50,1%" C="70,1%" />
</HOSTS>
</TYPE>
<TYPE ID="check_ssh">
<HOSTS>
<HOST H="192.168.0.3" P="21"/>
<HOST H="192.168.0.4" P="21"/>
<HOST H="192.168.0.4" P="21"/>
</HOSTS>
</TYPE>
....
</RECORD>

我还有一个应该读取该 XML 的 Perl 脚本，我正在使用 XML::XPath 模块。

use XML::XPath;
#.....
my $xp = XML::XPath->new(filename => 'test.xml');
#RETRIEVE ALL HOSTS WITH CHECK_SSH
my $querysshh = '/RECORD/TYPE[@ID="check_ssh"]/HOSTS/HOST';
$nodeset = $xp->find($querysshh);
foreach $mynode ($nodeset->get_nodelist) {
#HOW DO I RETRIEVE ATTRIBUTES NOW?
}
#.....

如何检索这些节点的属性？例如，如果我想阅读H 和P，我需要做什么？我查看了模块文档，但找不到任何有用的方法。

Answer 1

尝试 $myNode->getAttribute("H") 是否有效。