log_user 1 set timeout 6 puts "PRE-SPAWN"; flush stdout if {[catch {spawn /bin/cat} err]} { puts "SPAWN-ERR: $err" } else { puts "SPAWNED pid=[exp_pid]" } flush stdout send "HELLO-1\r" expect { "HELLO-1" { puts "GOT-HELLO" } timeout { puts "TIMEOUT" } eof { puts "EOF" } } puts "POST-EXPECT"; flush stdout