Como fazer um ping funcionar dentro de um script com expect

Pessoal

Estou tentando fazer um script para desligar os pc's de um laboratório e gostaria de contar com uma ajuda em colocar um ping dentro do while para que toda vez o script testasse primeiro se o pc remoto esta ativo, caso não ele passaria para o próximo host.Caso alguém se habilite a me ajudar.

Abaixo segue o script


#!/usr/bin/expect

#computadores.exp

#####Path e arquivos necessarios
set computadores "/home/laboratorio/scripts/iplist.txt"
##############################################################################

#####Password

set pass "password"

##############################################################################

set host ""

set timeout -1
match_max 100000

#Acessando a lista de computadores
set lista [open $computadores r]
while {[gets $lista host] > 0} {
#ssh para os computadores
spawn ssh $host
expect {
": " {
send "$pass\r"
expect ": "
send "sudo init 0\r"
expect ": "
send "$pass\r"
expect eof
}
timeout {
close
wait
}}
}
close $lista