TCL資料型別

原始資料型別在tcl中是字串，我們常常可以找到字串和引用在tcl語言中。這些原始資料型別依次建立復合資料型別列表和關聯陣列。在tcl中，資料型別可以表示不僅是簡單tcl的物件，但也可以代表相同的控制代碼，圖形物件(主要是小部件)複雜的物件，和i/o通道。

在tcl中，無論它是乙個整數，布林，浮點數，或乙個字串。當使用乙個變數，可以直接賦值給它，tcl沒有宣告一步。可以有內部表示為這些不同型別的物件。它可以將乙個資料型別到其它需要時。分配值給變數的語法如下。

#!/usr/bin/tclsh set myvariable 18

puts $myvariable

當上述**被執行時，它會產生以下結果。

上述宣告將建立乙個變數名myvariable，並將其儲存為乙個字串，即使我們沒有使用雙引號。現在，如果試圖讓該變數的運算，它會自動變成乙個整數。乙個簡單的例子如下所示。

#!/usr/bin/tclsh
set myvariable 18
puts [expr $myvariable + 6 + 9]

當上述**被執行時，它會產生以下結果。

需要注意的乙個重要的事情是，這些變數並沒有任何預設值，必須在使用之前指定值。

如果我們嘗試使用puts來列印，這個數字被轉化為正確的字串。有兩種表示方法，內部和外部，幫助 tcl 建立複雜的資料結構很容易相對於其他語言。另外，tcl 更有效，因為它是動態物件的性質。

不同於其他語言，在tcl，不需要包含雙引號，它只有乙個字。乙個例子如下，

#!/usr/bin/tclsh set myvariable hello

puts $myvariable

當上述**被執行時，它會產生以下結果。

hello

當我們想表示多個字串，可以使用雙引號或大括號。它如下所示。

#!/usr/bin/tclsh set myvariable "hello world" puts $myvariable set myvariable

puts $myvariable

當上述**被執行時，它會產生以下結果。

hello world

列表不過是一組元素，一組單詞或者使用雙引號或大括號可以用來表示乙個簡單的列表。乙個簡單的列表如下所示。

#!/usr/bin/tclsh
set myvariable 
puts [lindex $myvariable 2]
set myvariable "red green blue"
puts [lindex $myvariable 1]

當上述**被執行時，它會產生以下結果。

blue

green

關聯陣列有乙個索引（key）但不一定是整數。乙個簡單的例子如下所示：

#!/usr/bin/tclsh
set  marks(english) 80
puts $marks(english)
set  marks(mathematics) 90
puts $marks(mathematics)

當上述**被執行時，它會產生以下結果。

80

90

set myfile [open "filename" r]