我正在使用 XML::LibXML(版本:1.70)。
我的 xml 输入文件如下所示:
<?xml version="1.0" encoding="UTF-8"?>
<Equipment xmlns:xsd="http://www.w3.org/2001/XMLSchema"
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
<Equipments>
<ECID logicalName="SysNameAlpha" id="0"/>
<ECID logicalName="SysNameBeta" id="1"/>
</Equipments>
</Equipment>
和我的 Perl 脚本:
my $file = 'data.xml';
my $parser = XML::LibXML->new();
my $tree = $parser->parse_file($file);
my $root = $tree->getDocumentElement;
foreach my $camelid ($root->findnodes('Equipments')) {
my $name = $camelid->findvalue('ECID/@logicalName');
my $id = $camelid->findvalue('ECID/@id');
print $name;
print " = ";
print $id;
print ";\n";
}
我得到的输出是:
SysNameAlphaSysNameBeta = 01;
但我想要这样的输出:
SysNameAlpha = 0;
SysNameBeta = 1;
我怎样才能实现这个目标?
只有一个Equipments
节点,因此你只能得到一个$camelid
扫描。为了补救,您可以稍微改变一下,例如迭代设备/ECID:
foreach my $camelid ( $root->findnodes('Equipments/ECID') ) {
my $name = $camelid->findvalue('@logicalName');
my $id = $camelid->findvalue('@id');
...
}
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)