Posted to tcl by mjanssen at Thu Feb 12 18:54:48 GMT 2015view pretty

set doc [[dom parse {<test xmlns="http://www.google.com"/>}] documentElement]
set child [[dom parse {<item/>}] documentElement]
$child setAttributeNS "" xmlns "http://www,google.com"
$doc appendChild $child
$doc asXML