I read in and parse the below XML fine, it populates a hash with the values I want. In one area I want to increment the nextSessionID from the XML read in and then write the XML document back. When I run the below I get the XML document overwritten with an element with all other named tags being attributes of the main tag. Starting XML 
<?xml version="1.0" encoding="UTF-8"?>
    <mainTag>
    <items>
        <nextSessionID>1000</nextSessionID>
    </items>
    </mainTag>

[download]
After write I get 
<?xml version='1.0'?>
<items nextSessionID="1001" />

[download]
The segment of the program that deals with the XML document being read in and written out. 
my $xmlSimp = XML::Simple->new();
my $xmlCont = $xmlSimp->XMLin($xmlPath);
my $varIn = "";  our %xmlHash;
foreach my $keyI (keys (%{$xmlCont->{"items"}})) {
    $varIn = $xmlCont->{"items"}->{$keyI};
    $xmlHash{$keyI} = $varIn;
    if ($keyI eq "nextSessionID") {
    $xmlCont->{"items"}->{$keyI} = ++$varIn;
    }
}
my $tmpOut = $xmlSimp->XMLout($xmlCont, 
        KeepRoot   => 1, 
        OutputFile => $xmlPath,
        XMLDecl => "<?xml version='1.0'?>"
            );

[download]

In reply to Problem saving XML by rpike

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.