validating xml with perl

Johnd has asked for the wisdom of the Perl Monks concerning the following question:

I am trying to validate the below xsd http://nvd.nist.gov/schema/nvd-cve-feed_2.0.xsd with this xml : http://static.nvd.nist.gov/feeds/xml/cve/nvdcve-2.0-recent.xml using XML::LibXML::Schema and get an error message using the below code :

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

  my $parser = XML::LibXML->new;  
    my $doc = $parser->parse_file($xml); 
    eval { $schema->validate( $doc ) };  
    if ( my $ex = $@ ) {         return $ex;     }     
return; }
[download]

and get an error message that the schema is error could someone tell why this validation is end with error and if i need to revisit my code for this validation to end with success?

Comment on validating xml with perl Download Code

Replies are listed 'Best First'.
Re: validating xml with perl by tangent (Parson) on Mar 18, 2012 at 20:38 UTC
Can you post the full error message. I tried the code below and got no errors. `use XML::LibXML; my $xsd = 'http://nvd.nist.gov/schema/nvd-cve-feed_2.0.xsd'; my $xml = 'http://static.nvd.nist.gov/feeds/xml/cve/nvdcve-2.0-recent. +xml'; my $schema = XML::LibXML::Schema->new(location =>$xsd); my $parser = XML::LibXML->new; my $doc = $parser->parse_file($xml); eval { $schema->validate( $doc ) }; if ( my $ex = $@ ) { print $ex; } else { print "Schema validated ok"; } # OUTPUT Schema validated ok` [download]	[reply] [d/l]
Re^2: validating xml with perl by Johnd (Initiate) on Mar 18, 2012 at 21:30 UTC
here is the error message i get: Schemas parser error : Failed to locate the main schema resource at 'http://nvd.nist.gov/schema/nvd-cve-feed_2.0.xsd'	[reply]
Re^3: validating xml with perl by tangent (Parson) on Mar 19, 2012 at 19:12 UTC
It seems like you're not even getting as far as retrieving the xsd file from the remote server. Can you normally retrieve files over the internet using Perl?	[reply]