如何在期望程序中为 spawn 命令编写多行？

Question

我编写了这个小脚本，用于从远程服务器获取多个文件到我的主机：

#! /usr/bin/expect -f

spawn scp \
user@remote:/home/user/{A.txt,B.txt} \
/home/user_local/Documents
expect "password: "
send "somesecretpwd\r"
interact

这工作正常，但是当我想在文件之间创建新行时：

user@remote:/home/user/{A.txt,\
B.txt} \

我收到以下错误：

scp: /home/user/{A.txt,: No such file or directory
scp: B.txt}: No such file or directory

我试过了：

user@remote:"/home/user/{A.txt,\
B.txt}" \

得到：

bash: -c: line 0: unexpected EOF while looking for matching `"'
bash: -c: line 1: syntax error: unexpected end of file
cp: cannot stat 'B.txt}"': No such file or directory

或者这个：

"user@remote:/home/user/{A.txt,\
B.txt}" \

在开始时遇到同样的错误。

我怎样才能在多行中编写文件，但这样程序才能正常工作？我需要这个来提高所选文件的可读性。

编辑： 只将本地用户名改为user_local

Answer 1

在 Tcl（以及 Expect）中，\<NEWLINE><SPACEs> 将被转换为一个 <SPACE>，因此您不能将不包含空格的字符串写入多行。

% puts "abc\
        def"
abc def
% puts {abc\
        def}
abc def
%

Answer 2

假设文件名真的更长（否则没什么意义），您可以使用如下几个变量：

#! /usr/bin/expect -f

set A A.txt
set B B.txt

spawn scp \
user@remote:/home/user/{$A,$B} \
/home/user/Documents
expect "password: "
send "somesecretpwd"
interact

Answer 3

对于任何想要仅使用 expect 来解决类似问题的人：

您可以编写文件列表，然后将所有文件连接到一个字符串。

代码如下：

#! /usr/bin/expect -f

set files {\ # a list of files
A.txt\
B.txt\
C.txt\
}

# will return the concatenated string with all files
# in this example it would be: A.txt,B.txt,C.txt
set concat [join $files ,]

# self made version of concat
# set concat [lindex $files 0] # get the first file
# set last_idx [expr {[llength $files]-1}] # calc the last index from the list
# set rest_files [lrange $files 1 $last_idx] # get other files
# foreach file $rest_files {
#     set concat $concat,$file # append the concat varibale with a comma and the other file
# }
# # puts "$concat" # only for testing the output

spawn scp \
user@remote:/home/doublepmcl/{$concat} \
/home/user_local/Documents
expect "password: "
send "somesecretpwd\r"
interact