(Perl) Create XML with Multiple Same-Tag Children

Demonstrates how to create XML where siblings have the identical tags.

Chilkat Perl Downloads Perl Module for Windows, MacOS, Linux, Alpine Linux, Solaris

use chilkat();

# This example creates the following XML:

# <soap:Envelope>
#     <soap:Body>
#         <S:AlternatePartyIds>
#             <S:Id>123456789</S:Id>
#             <S:AssigningPartyId>NationalId</S:AssigningPartyId>
#         </S:AlternatePartyIds>
#         <S:AlternatePartyIds>
#             <S:Id>987654</S:Id>
#             <S:AssigningPartyId>DriversLicense</S:AssigningPartyId>
#             <S:IssuingState>SD</S:IssuingState>
#         </S:AlternatePartyIds>
#     </soap:Body>
# </soap:Envelope>

$xml = chilkat::CkXml->new();
$xml->put_Tag("soap:Envelope");
$xml->UpdateChildContent("soap:Body|S:AlternatePartyIds|S:Id","123456789");
$xml->UpdateChildContent("soap:Body|S:AlternatePartyIds|S:AssigningPartyId","NationalId");
$xml->UpdateChildContent("soap:Body|S:AlternatePartyIds[1]|S:Id","987654");
$xml->UpdateChildContent("soap:Body|S:AlternatePartyIds[1]|S:AssigningPartyId","DriversLicense");
$xml->UpdateChildContent("soap:Body|S:AlternatePartyIds[1]|S:IssuingState","SD");

print $xml->getXml() . "\r\n";