我正在使用 XML::LibXML::Reader 来解析一个大文档,但遇到了一个问题,即属性 xmlns 导致 findnodes() 失败。我通过添加正则表达式来删除 xmls 属性来修复它,但我想知道是否有更优雅的解决方案不涉及正则表达式。如果您删除正则表达式行 ($xml =~ s{xmlns...),您将看到“Loc = $loc”不会产生任何结果。
这是代码:
use strict;
use warnings;
use feature qw( say );
use XML::LibXML::Reader qw( XML_READER_TYPE_ELEMENT );
my $xml = <<'__EOI__';
<url xmlns="http://www.sitemaps.org/schemas/sitemap/0.9">
<loc>http://example.com</loc>
<lastmod>2018-10-19</lastmod>
</url>
__EOI__
$xml =~ s{xmlns="http://www.sitemaps.org/schemas/sitemap/0.9"}{};
my $reader = XML::LibXML::Reader->new( string => $xml);
while ( $reader->read ) {
next unless $reader->nodeType == XML_READER_TYPE_ELEMENT;
next unless $reader->name eq 'url';
my $xml = $reader->readOuterXml;
my $doc = XML::LibXML->load_xml(string => $xml);
say "Doc = $doc";
my ($loc) = $doc->findnodes('//loc');
say "Loc = $loc";
}
Run Code Online (Sandbox Code Playgroud)
您要求查找命名空间为 null 和 name 的节点loc。文档中没有这样的节点,所以findnodes正确地不返回任何内容。
您想找到具有 namespacehttp://www.sitemaps.org/schemas/sitemap/0.9和 name的节点loc。您可以使用以下方法来实现:
my $doc = XML::LibXML->load_xml( string => $xml );
my $xpc = XML::LibXML::XPathContext->new();
$xpc->registerNs( sm => 'http://www.sitemaps.org/schemas/sitemap/0.9' );
my ($loc) = $xpc->findnodes('//sm:loc', $doc);
Run Code Online (Sandbox Code Playgroud)