Tcl语言cmdline包

Cmdline包主要用来处理命令行输入。

• getopt argvVar optstring optVar valVar
  getopt与C语言中的getopt函数类似，如果成功取出命令行参数返回1，如果所有的命令行参数已经取完返回0，发生错误返回-1。argvVar是包含了参数的字符串，一般就是argv，optstring说明了参数选项，如果参数后还有值需要输入，例如“-f abc”这样的形式，这个时候参数选项需要以“.arg”结尾。valVar说明了取到的参数值的存储，如果以“.arg”返回实际取到的参数的值，否则返回1。
•  getKnownOpt argvVar optstring optVar valVar
  和getopt类似，但是忽略所有不认识的选项。
•  getoptions arglistVar optlist  ? usage ?
  和getopt类似，只是一次调用就取回所有的选项。
•  getKnownOptions arglistVar optlist  ? usage ?
  和getKnownOpt类似，只是一次调用就取回所有的选项。 

例子1：
#!/usr/local/bin/tclsh

package require cmdline

set flag_a 0
set flag_b 0
set value_r 0
set value_t ""

set usage "Usage:
                -a              set flag a