Evaluated proc rval str {. [lindex [json2dict $str] 3 3 0 3]}