TCL指令碼讀取命令列引數

1：Tcl指令碼的執行
   A：獲取tclsh（linux）、tclsh.exe（windows）的安裝路徑
   B：指令碼第一行書寫 “#!C:\Tcl\bin\tclsh” 或者 “#!/usr/bin/tclsh” 所有解釋性語言(shell、perl)開頭都是這玩意。
   C：Linux 下直接./test.tcl 就可以了。windows下要使用 "tclsh test.tcl"否則會彈出一個頁面，看不到輸出結果（我使用的是Active Tcl）。

 

2：獲取命令列引數
  和C語言一樣，Tcl中有兩個預設變數，$argc 儲存命令列引數的個數。list $argv中包含了引數資訊。

舉例如下：  
#!C:\Tcl\bin\tclsh

set i 0
while {$i < $argc} {
    #lindex 命令用於取出list中指定索引的引數
    set arg [lindex $argv $i]  
    puts "$arg"
    #incr 命令用於對變數進行加操作
    incr i 1
}