Select Code to Download

use strict;
use XML::Simple;
...

# Dump the result
print XMLout ($root, RootName => undef);

  <FILER url="http://somewhere">
    <LOCATION name="1stFloor" />
    <PROJECT name="test_project" />
    <USER email="some@email.com" />
  </FILER>

use strict;
use XML::TreeBuilder;
...

# Dump the result
print $root->as_XML ();

<FILER url="http://somewhere"><PROJECT name="test_project"></PROJECT><
+USER email="some@email.com"></USER><LOCATION name="1stFloor"></LOCATI
+ON></FILER>

use strict;
use XML::Twig;
...

# Dump the result
$root->print ();

<FILER url="http://somewhere"><PROJECT name="test_project"/><USER emai
+l="some@email.com"/><LOCATION name="1stFloor"/></FILER>