DSWSIS : DATA BIT

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”

Tcl array can be created by set command by specifying its key to array name.

From example above we define array named days with keys containing numbers and text values. If we try to do variable substitution with $days, it wont work. If we do variable substitution with key specified then it will work.

We can have text as array’s key. Tcl array is an associative array.

From sample above we know that a text key is case sensitive (ID is different with id).

Another way to create array is with array set command by passing list of key value pairs as 3rd parameter and array name as 2nd parameter.

Thats all how we create array in Tcl. Bye!