I found a super simple solution here:

http://blog.namran.net/2011/01/22/xml-beautify-using-perl-xmlwriter/
[download]

Basically, what one needs is this:

  my $writer = new XML::Writer (
    OUTPUT => \$xml, DATA_MODE => 1,DATA_INDENT => 2
  );
[download]