my $dc = XML::DOM::Lite::Document->new();
my $root = $dc->createElement("xml");

my $elem = $dc->createElement("A");
$elem->setAttribute("B", "C");
$root->appendChild($elem);
$dc->appendChild($root);

print $dc->xml();


Output:
=======
<xml>
  <A B="C" />
</xml>



##</code><code>##


Desired output:
===============
<xml>
  <A><B> C </B></A>
</xml>



##</code><code>##


my $dc = XML::DOM::Lite::Document->new();
my $root = $dc->createElement("xml");

my $elem = $dc->createElement("A");
my $elem2 = $dc->createElement("B");    # Added
$elem2->createTextNode("C");		# Added
$elem->appendChild($elem2);		# Added
$root->appendChild($elem);
$dc->appendChild($root);