### What is Array?

During execution, we can have a few variables which we need. So we can take these variables in the form of array in tcl.

set array(index) value ;

The way we set variables, in the same way we set an array. The only difference is that it comes with a pattern of variables.

set numbers (0) 10 ;

set numbers (1) 20;

puts $numbers (0)

puts $numbers (1)

Result : 10

20

### Size of Array

[array size variable_name]

set numbers (0) 10 ;

set numbers (1) 20;

[array size numbers]

Results : 2

We can have conditional statements and loops in array.

set numbers (0) 10;

set numbers (1) 20;

for {set index 0} {$index < [array size numbers]} {incr index} {

puts “numbers($index) : $numbers ($index)”

}

Result: number (0) : 10

number (1) : 20

Similar to ‘for’ loop, we can use foreach loop as well.

set numbers (0) 10;

set numbers (1) 20;

foreach index [array names numbers] {

puts “numbers($index) : $numbers ($index)”

}

Result: number (0) : 10

number (1) : 20