Re: How can i validate xml file?

[monkey_boy]

Not perl, but if your on a linux os, then check if xmllint is installed, this can be used to validate your xml in superfast time,

system("xmllint --noout foo.xml") and die "Failed!";

[Anonymous Monk]

Thanks monkey_boy, and davido now i get answer from davidrw answer chanceless thanks davidrw.

use XML::LibXML;
my $parser   = XML::LibXML->new();
my $xml_text = eval { $parser->parse_string($text); };
print $@

[Anonymous Monk]

Hi monkey_boy,

Thanks kool, It's working fine. But, I am getting xml content is it possible to check. And also, i am not allow here to use system function i want sample code.. For ex if i validate xml file with xsd file i use below code like i want code please

use XML::LibXML;

my $schema_file = 'po.xsd';
my $document    = 'po.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";

[davorg]

If your input data is not well-formed XML (and I assume that's what you're asking about) then the parse_file call will die. Put a eval around that call and check the value in $@ after parse_file returns.