相关疑难解决方法(0)

我正在试图找出如何使用Tcl评估If语句中的表达式.这就是我所拥有的:

#!/bin/sh
#The next line executes wish - wherever it is \
exec wish "$0" "$@"

set apid "/var/run/apache2.pid"

set apsta [file exist $apid]

if { $apsta == 1 }

{
    set result ":)"
}

else

{
    set result ":("
}

label .status -text $result
pack .status

这就是我从终端获得的:

# wan27
Error in startup script: wrong # args: no script following " $apsta == 1 " argument
    while executing
"if { $apsta == 1 }"
    (file "/usr/bin/wan27" line 9)

如果Apache正在运行,我只是想输出一个快乐的笑脸,如果Apache被停止,这是一个令人遗憾的笑脸 - …