Select Code to Download

<?xml version="1.0" encoding="utf-8"?>
<config>
...
    </site>
  </sites>
</config>

#!/usr/bin/perl

...
               'filename' => '/path/to/xmlfile');
$tidy_obj->tidy();
$tidy_obj->write();