Select Code to Download

TestResult xmlns="somevalue" xmlns:xsi="somealue" xsi:schemaLocation="
+somevalue">
  <Result>Pass</Result> 
...
  <File key="FileTag3">Path to file</File> 
  </Files>
  </TestResult>

use strict;
...
 my $format = '1';
  $doc->toFile($filename,$format);

 <?xml version="1.0" encoding="utf-8"?>
<TestResult xmlns="somevalue" xmlns:xsi="some value" xsi:schemaLocatio
+n="some value">
  <Result>Pass</Result>
</TestResult>