Tcl has one-dimensional associative arrays, the array indices can be arbitrary strings:
% set colour(monday) blue blue % puts $colour(monday) blue