Anonymous user
XML validation: Difference between revisions
m
→{{header|Perl}}
Line 195:
use 5.018_002;
use warnings;
use Try::Tiny;
use XML::LibXML;
Line 217 ⟶ 215:
for ( \$good_xml, \$bad_xml ) {
try {
$xmlschema->validate( ${$
}
finally {
if (@
say "Not valid: @
}
else {
|