expect中为send语句上加变量的代码

#!/usr/bin/expect
set ssh_user "fivetrees"
set password "123456"
spawn ssh -i /root/.ssh/$ssh_user  [e-mail]
expect_before "no)?" {
send "yes\r" }
sleep 1
expect "enter passphrase for key*"
send "$password\r"
for {set snum 0} {$snum <= 6} {incr snum} {
expect "*#"
send "ls -l /opt/backup/fivetreesdb_s$snum\r"
sleep 3
}
sleep 2
expect "*#"
send "echo\r"
exit