如何查找expect脚本中是否存在文件

Question

我在我的期望剧本中有这样的声明

send "sed -i -e 's/$oldport/$newport/' backup.txt\r"
expect "$ "

但是我想首先检查文件backup.txt是否存在，如果存在，则编辑它。

我如何实现这一目标？

由于

Answer 1

由于expect是Tcl的扩展，all Tcl commands可供使用：

if {[file exists backup.txt]} {
    send "sed -i -e 's/$oldport/$newport/' backup.txt\r"
    expect "$ "
}

Answer 2

以下是使用 ls

的快速方法

set file "backup.txt"
send "ls $file\r"
expect {
        "\r\n$file" {puts "\nfile exists"}
        "cannot access $file" {puts "\nfile not found"}
}

您只需将puts "\nfile exists"替换为您的陈述。