Posted to tcl by mr_calvin at Fri Jul 14 12:39:15 GMT 2017view pretty
% set x {{"a":"\/"}}; {"a":"\/"} % set x {"a":"\/"} % [dom parse -json $x] asJSON {"a":"/"}
% set x {{"a":"\/"}}; {"a":"\/"} % set x {"a":"\/"} % [dom parse -json $x] asJSON {"a":"/"}