(Tcl) XML NewChild2 using a Tag Path

Demonstrates the XML NewChild2 method using a tag path.

Note: This example requires Chilkat v9.5.0.64 or later.

Chilkat Tcl Extension Downloads Chilkat Tcl Extension Downloads

load ./chilkat.dll

# Note: This example requires Chilkat v9.5.0.64 or later.
set xml [new_CkXml]

CkXml_put_Tag $xml "aaa"

# A single tag can be passed to NewChild2, and this behaves as it always has:
CkXml_NewChild2 $xml "penguin" "flightless bird"
CkXml_NewChild2 $xml "mammal" ""
puts [CkXml_getXml $xml]

# The output:

# 	<?xml version="1.0" encoding="utf-8" ?>
# 	<aaa>
# 	    <penguin>flightless bird</penguin>
# 	    <mammal />
# 	</aaa>
# 
# Starting in v9.5.0.64, a tag path can be used.
# It will cause nodes to be automatically created as needed.
CkXml_NewChild2 $xml "red|green|blue" "sky"
CkXml_NewChild2 $xml "mammal|rodent|squirrel" "bushy tail"
puts [CkXml_getXml $xml]

# The output:

# 	<?xml version="1.0" encoding="utf-8" ?>
# 	<aaa>
# 	    <penguin>flightless bird</penguin>
# 	    <mammal>
# 	        <rodent>
# 	            <squirrel>bushy tail</squirrel>
# 	        </rodent>
# 	    </mammal>
# 	    <red>
# 	        <green>
# 	            <blue>sky</blue>
# 	        </green>
# 	    </red>
# 	</aaa>
# 

delete_CkXml $xml