如何计算期望脚本中的命令行参数？

Question

这是我的简单期望脚本：

#!/usr/local/bin/expect
puts "Argu 1 : [lindex $argv 0]"

Run
---
expect example.expt Testing

Output
------
Argu 1: Tesing

我需要计算命令行传递的参数。像这样：

expect example.expt 1 2 3 4

I need the script for the following output
Total: 4 arguments
Arg1: 1
Arg2: 2
Arg3: 3
Arg4: 4

我怎样才能做到这一点？谢谢！

Answer 1

expect使用Tcl作为其脚本语言。您正在寻找llength命令：

puts "Total: [llength $argv] argument(s)"