use XML::Mini::Document;
my $newDoc = XML::Mini::Document->new();
my $root = $newDoc->getRoot();
my $header = $root->header('xml'); # set the header
$header->attribute('version', '1.0');
my $kid = $root->createChild('foo');
$kid->text("Yes, I am  a kid");
$root->createChild('foo')->text('Me Too');

print $newDoc->toString();
__END__
<?xml version="1.0"?>
 <foo>
  Yes, I am  a kid
 </foo>
 <foo>
  Me Too
 </foo>