10 lines
184 B
Tcl
10 lines
184 B
Tcl
set arrayname(item) $value
|
|
|
|
# or set a series of item value pairs at one time:
|
|
|
|
# create initial array
|
|
array set skates {
|
|
name {Rocket Skates}
|
|
price 12.75
|
|
color yellow
|
|
}
|