Evaluated proc hex2rgb hex { m [nsplit $hex 2] {x {hex2dec $x}} { } }