Select Code to Download

<?xml version="1.0" encoding="UTF-8"?>
<DSExport>
...
      </Record>           
   </Job>
 </DSExport>

<Job Identifier="adresses">
     <tables>APPS.RA_ADDRESSES_ALL</tables>
...
               )
     </usersql>
</Job>

use strict;
use XML::Twig;
...
    $root->delete;
  }