关于tcl/tk的问题

我希望用expect编写一个脚本，查找指定目录下的一个文件，如果没有此文件，返回一个信息比如“no such file”,如果有的话，也返回一个信息，请问怎么写呀？？？

谢谢！！

如果我的帖子发错了版快，请大家原谅，也希望大家给help~~
THX
:cool: 　　　　　　

expect不是用来干这种事情的.

#!/bin/sh
cd 某目录
if test -f 某文件; then
   echo "找到了'
else
   echo "No such file"
fi　　　　　　

你可能误会我的意思了，我需要用expect实现那种功能是因为我要测试一个服务，比如简单的测试smb的start，stop功能是否正确，如果start是在正确的，那么我就要查找在/var/lock/subsys/目录下是否存在smb这个文件，如果存在就说明真的启动了，如果没有，就说明smb启动是失败的。这样的话，我需要在expect中写入查找的语句。
以上问题我已经解决了，使用的是file exists.

我现在希望把把start，stop做为参数，然后根据我输入的参数，控制smb的起动，停止等，这样程序就根据系统返回的ok，failed 等判断服务是否正确。
不知道这样可行吗？？？


我现在遇上一个问题就是 关于index $argv 1
是这样的
spawn /etc/init.d/smb  [ index $argv 1 ]
每次都提示说index是错误的，请问这是为什么　　　　　　

好象应该是lindex吧.　　　　　　

我想问下如何输入两个参数，就是说我现在已经能够根据输入参数start,stop测试smb服务的正确与否，现在我想测试任意一个服务，我只要输入/etc/init.d/http start 就可以测试了，想测试mysql就直接输入/etc/init.d/mysql stop,而无须再另外为为mysql编写测试程序了，请问有什么办法解决呀？？？？


谢谢