Select Code to Download

<?xml version="1.0" encoding="UTF-8"?>
<schema xmlns="http://www.w3.org/2001/XMLSchema"
...
</element>

</schema>

<?xml version="1.0" encoding="UTF-8"?>
<schema xmlns="http://www.w3.org/2001/XMLSchema"
...
</complexType>

</schema>

use warnings;
use strict;
...
        { print "=> Valid!\n" }
    else { print "=> Invalid! $@" }
} continue { $i++ }

Loading schema...
'schema.xsd' => Loading 'schema.xsd' from disk
...
=> Invalid! unknown-137e570:0: Schemas validity error : Element '{http
+://www.example.com}world': The attribute 'foo' is required but missin
+g.
Validating XML #3...
=> Invalid! unknown-137e570:0: Schemas validity error : Element '{http
+://www.w3.org/1999/xhtml}foo': This element is not expected. Expected
+ is one of ( {http://www.w3.org/1999/xhtml}a, {http://www.w3.org/1999
+/xhtml}br, {http://www.w3.org/1999/xhtml}span, {http://www.w3.org/199
+9/xhtml}bdo, {http://www.w3.org/1999/xhtml}object, {http://www.w3.org
+/1999/xhtml}applet, {http://www.w3.org/1999/xhtml}img, {http://www.w3
+.org/1999/xhtml}map, {http://www.w3.org/1999/xhtml}iframe, {http://ww
+w.w3.org/1999/xhtml}tt ).

use warnings;
use strict;
...
    </ObjectUrl>
  </Link>
</LinkSet>

my $CACHE_DIR = '/tmp/xmlcache';
use File::Path qw/make_path/;
...
    close $fh;
    return $data;
});