цикл Еогеасп в скрипт ожидать не принимает переменные

Question

#!/bin/bash 
expect << EOF 
exp_internal 1 

spawn ssh nbhambha@10.118.137.78 
expect "ssword:" 
send "********\r" 
sleep 3 
set list [open list1 r] 

foreach line \$list 
{ 
    expect " $" 
    send "seeisso \$list | grep -E -i ' os |proddropdown|hostname'" 
    send "\r" 
    sleep 5 
    expect -re " $" 
    set fid [open out1.txt a] 
    puts \$fid \$expect_out(buffer) 
} 
close $fid 

EOF 

======

Список 1 содержит:

APSE0112

ETLLT0000

======== =====

Результат сценария:

expect: does " " (spawn_id exp6) match glob pattern " $"? yes 
expect: set expect_out(0,string) " " 
expect: set expect_out(spawn_id) "exp6" 
expect: set expect_out(buffer) " " 
send: sending "seeisso file7 | grep -E -i ' os |proddropdown|hostname'" to { exp6 } 
send: sending "\r" to { exp6 } 

expect: does "" (spawn_id exp6) match regular expression " $"? no 


expect: does "\r\n" (spawn_id exp6) match regular expression " $"? no 
seeisso file7 | grep -E -i ' os |proddropdown|hostname' 

expect: does "\r\nseeisso file7 | grep -E -i ' os |proddropdown|hostname'\r\n" (spawn_id exp6) match regular expression " $"? no 

===================

Я не знаю, откуда она принимает значение file7. и когда я изменить:

send "seeisso \$list | grep -E -i ' os |proddropdown|hostname'"

в

send "seeisso **$list** | grep -E -i ' os |proddropdown|hostname'"

он принимает пустое значение:

expect: set expect_out(0,string) " " 
expect: set expect_out(spawn_id) "exp6" 
expect: set expect_out(buffer) " " 

send: sending "seeisso | grep -E -i ' os |proddropdown|hostname'" to { exp6 } 
send: sending "\r" to { exp6 } 

expect: does "" (spawn_id exp6) match regular expression " $"? no 


expect: does "\r\n" (spawn_id exp6) match regular expression " $"? no 
seeisso | grep -E -i ' os |proddropdown|hostname' 

===========

Помогите

Answer 1

Я видел несколько проблем:

1. list в вашем случае это действительно дескриптор файла, а не содержимое файла.
2. У вас есть обратный слеш перед $list, которые я не понимаю причину
3. Вы не используете ваш line переменной

Вот предложение, чтобы увидеть, если он работает:

set fileHandle [open list1] 
while {[gets $fileHandle line] != -1} { 
    expect " $" 
    send "seeisso $line | grep -E -i ' os |proddropdown|hostname'" 
    send "\r" 
    # the rest ... 
} 
close $fileHandle