my $writer = XML::Writer->new(OUTPUT      => $fh,
                                  DATA_MODE   => 1,
                                  DATA_INDENT => 4);
    $writer->dataElement(foo  => $bar);
    $writer->end();