Select Code to Download

<?xml version="1.0" encoding="UTF-8"?>
<TEST> é </TEST>

use XML::DOM;

...

 # cleanup
 $doc->dispose;