使用Expect脚本自动化win32 exe

Question

我正在尝试在Windows XP计算机上使用Expect脚本来自动执行基于命令行菜单的应用程序。
该应用程序基本上加载一个菜单，说明1.Perform选项＃1 2.Perform选项＃2 ...并等待用户键入选项，然后加载另一个子菜单。以下是我正在尝试执行的代码：

  package require Expect
  puts stdout "Starting menu based CLI application"
  spawn C:\Documents and Settings\Administrator\Desktop\pds\CSERCLCD
  puts stdout "spawn completed"
  expect -re "*.*(Syntax is).*:.*" {
      puts stdout "received response from ping"
  }

代码的期望部分永远不会进入上面指定的条件并且脚本刚退出，我在调用应用程序上的spawn时有什么问题，请告诉我。 输出如下：

 C:\DOCUME~1\ADMINI~1\Desktop>tclsh.exe test.tcl
 Starting menu based CLI application