Help for this page
use strict; use XML::Generator; ... ) ); print RPT "$xml";
use strict; use XML::Generator; ... }) }); print NEWRPT "$newxml";