11 lines
184 B
Tcl
11 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
|
||
|
|
}
|