TCL脚本语言：过程调用中用命令行传递参数如何实现

比如有这样一个子程序
proc total {args}{
set total 0
foreach i $args{
incr total $i
}
return $total
}
如何来写调用语句来完成从命令行传递参数

All Tcl scripts have access to three predefined variables.
$argc - number items of arguments passed to a script.
$argv - list of the arguments.
$argv0 - name of the script.

你好！ 用“args“关键字表示支持可变参数。 total [list 1 2 3] 如果对你有帮助，望采纳。