Lets start with running tcl script below to try out some array command :
set ar(1) one
set ar(2) two
set ar(3) three
puts array_size:[array size ar]
puts array_get:[array get ar]
puts array_names:[array names ar]
foreach {key} [array names ar] {set x $ar($key); puts $x}
On example above we use 3 array subcommand : Continue reading “Tcl : Working with array”


