1 a5915f75 2005-08-12 alex # $Id: stress-A.e,v 1.2 2005/08/12 21:35:12 alex Exp $ 2 fc6f6474 2002-09-09 alex 3 a5915f75 2005-08-12 alex set timeout 30 4 a5915f75 2005-08-12 alex 5 fc6f6474 2002-09-09 alex spawn telnet localhost 6789 6 fc6f6474 2002-09-09 alex expect { 7 fc6f6474 2002-09-09 alex timeout { exit 1 } 8 fc6f6474 2002-09-09 alex "Connected" 9 fc6f6474 2002-09-09 alex } 10 fc6f6474 2002-09-09 alex 11 fc6f6474 2002-09-09 alex # -eof-