Как проверить XML с помощью XSD в Perl?

Question

Это может быть простой вопрос для большинства программистов на Perl, я использовал Perl только две недели и очень незнакомы с пакетами Perl.

У меня есть простой файл XSD, как показано ниже:

<?xml version="1.0" ?> 
<xsd:schema xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:sql="urn:schemas-microsoft-com:mapping-schema"> 
    <xsd:element name="elementname"> 
     <xsd:complexType> 
      <xsd:sequence> 
       <xsd:element name="field1" type="xsd:integer" minOccurs="0" maxOccurs="1"/> 
       <xsd:element name="field2" type="xsd:string" minOccurs="0" maxOccurs="1"/>    
      </xsd:sequence> 
     </xsd:complexType> 
    </xsd:element> 
</xsd:schema> 

Я хотел бы, чтобы проверить файл XML с выше XSD, чтобы обеспечить это правильный XML. Какой модуль Perl я должен использовать? Я предпочитаю модуль, доступный как на ActivePerl, так и на Perl на * nix. Было бы очень полезно опубликовать некоторые фрагменты кода.

Благодаря

Answer 1

Я думаю, что вам нужно XML::Validator::Schema из CPAN. Вот README и установить:

perl -MCPAN -e 'install XML::Validator::Schema' 

Answer 2

XML::LibXML::Schema имеет метод validate.

См. Также мой ответ Why does my XSD file fail to parse with XML::LibXML?.