Select Code to Download

#! /usr/bin/perl -w

...
$doc->parse_file('stsdef.xml');
my $rng = new XML::LibXML::RelaxNG(location => 'stsdef.rng');
$rng->validate($doc);