Завершение сеансов spawn в expect

Я пытаюсь решить проблему с помощью сценария Expect, который входит в очень большое количество устройств (тысячи). Скрипт составляет около 1500 строк и достаточно вовлечен; его задача-аудит управляемого оборудования в сети с множеством тысяч узлов. В результате он входит в устройства через telnet, запускает команды для проверки работоспособности оборудования, записывает эту информацию в файл, а затем выходит из системы, чтобы перейти к следующему устройству.

здесь я сталкиваюсь с моим проблема; каждый expect в моем скрипте есть тайм-аут и eof, например:

timeout {
    lappend logmsg "$rtrname timed out while <description of expect statement>"
    logmessage
    close
    wait
    set session 0
    continue
}
eof {
    lappend logmsg "$rtrname disconnected while <description of expect statement>"
    logmessage
    set session 0
    continue
}

мой заключительный expect закрывает каждый сеанс spawn вручную:

-re "OK.*#" {
    close
    send_user "Closing session... "
    wait
    set session 0
    send_user "closed.nn"
    continue
}

продолжение возвращает скрипт к циклу while, который инициирует следующий сеанс spawn, предполагая, что session = 0.

установленный сеанс 0 отслеживает, когда сеанс spawn закрывается вручную по таймауту или через EOF перед открытием нового сеанса spawn, и все, кажется, указывает на то, что spawn сеансы закрываются, но после тысячи или около того порожденных сеансов я получаю следующую ошибку:

spawn telnet <IP removed>
too many programs spawned?  could not create pipe: too many open files

теперь я сетевой инженер, а не администратор UNIX или профессиональный программист, так может ли кто-нибудь помочь мне направить меня к моей ошибке? Закрываю ли я сеансы telnet spawn, но неправильно закрываю канал? Я написал второй, тестовый скрипт, который буквально просто подключается к устройствам один за другим и отключается сразу после формирования соединения. Он не входит в систему и не выполняет никаких команд как и мой основной скрипт, и он работает безупречно через тысячи соединений. Этот скрипт приведен ниже:

#!/usr/bin/expect -f

#SPAWN TELNET LIMIT TEST

set ifile [open iad.list]
set rtrname ""
set sessions 0

while {[gets $ifile rtrname] != -1} {
set timeout 2
spawn telnet $rtrname
incr sessions
send_user "Session# $sessionsn"
expect  {
    "Connected" {
                close
                wait
                continue
                }
    timeout     {
                close
                wait
                continue
                }
    eof         {
                continue
                }
}

в моем основном скрипте я регистрирую каждое соединение и почему они могут EOF или timeout (через процесс logmessage, который записывает конкретную причину в файл), и даже когда я не вижу ничего, кроме успешных порожденных соединений и закрытых соединений, я получаю ту же проблему с моим основным скриптом, но не тестовым скриптом.

Я тут читала убийство процесс IDs, но, как я понимаю,закрыть должен быть убит идентификатор процесса текущей сессии spawn и ждать должен останавливать сценарий, пока процесс не будет мертв. Я также попытался использовать простую команду "exit" с устройств, чтобы закрыть соединение telnet, но это не дает никаких лучших результатов.

мне может просто понадобиться предложение о том, как лучше отслеживать Открытие и закрытие моих сессий и гарантировать, что между устройствами, сеансы spawn не остаются открытыми. Любая помощь, которая может быть предложена, будет высоко оценена.

спасибо!