Posted to tcl by de at Thu Feb 12 19:09:55 GMT 2015view pretty
package require tdom set xml {<test xmlns="URI"/>} set doc [dom parse $xml] set root [$doc documentElement] set newNode [$doc createElementNS URI item] $root appendChild $newNode puts [$doc asXML]