使用LibXML驗證XML

Question

目前，我使用XML :: LibXML perl模塊根據定義的XML模式驗證XML文件。 目前，如果我的XML文件無法針對定義的XML Schema成功驗證，我將得到一個錯誤列表通知我，例如某些元素不是預期的，然后是預期的。 在我的XML文件中，我將有許多相同名稱的元素，但它們可能嵌套在XML文件的不同位置。

我的問題是，無論如何，我可以在嘗試執行驗證時輸出可能出錯的任何元素的XPath位置嗎？

目前，我的XML文件非常龐大，並且在驗證失敗時很難“調試”它，因為錯誤中顯示的元素的名稱可能會在XML文件的不同位置多次出現。

我的代碼如下所示，使用LibXML根據模式驗證XML文件。

#!/usr/bin/perl
use strict;
use warnings;
use XML::LibXML;

my $schema_file = 'MySchema.xml';
my $document    = 'MyFile.xml';

my $schema = XML::LibXML::Schema->new(location => $schema_file);

my $parser = XML::LibXML->new;
my $doc    = $parser->parse_file($document);

eval { $schema->validate($doc) };
die $@ if $@;

print "$document validated successfully\n";

Answer 1

我偶然發現了同樣的問題，發現XML解析器默認不存儲行號。 但您可以使用構造函數的XML_LIBXML_LINENUMBERS參數告訴他這樣做。

以下腳本將告知實際行號而不是0

use Modern::Perl;
use XML::LibXML;

my ($instance, $schema) = @ARGV;

my $doc = XML::LibXML->new(XML_LIBXML_LINENUMBERS => 1)->parse_file($instance); 
my $xmlschema = XML::LibXML::Schema->new( location => $schema );
my $res = eval { $xmlschema->validate( $doc ); };

say "error: $@" if $@;
say "res: ", $res//'undef';

Answer 2

您可能需要查看： XML :: Validate以獲取行號和列號？

Answer 3

請參閱Padre :: Task :: SyntaxChecker :: XML的源代碼。 Padre IDE使用此模塊對XML文件進行語法檢查。 另請參閱Padre-Plugin-XML發行版中的t / 01-valid.t以獲取包括行號在內的用法示例。