Evaluated proc hex2dec {hex {sep { }}} {scan $hex %x}