Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!wuarchive!uunet!sdl!mntgfx!pbrooks
From: pbrooks@mentorg.com (Phil Brooks)
Newsgroups: comp.lang.perl
Subject: chat and perl for new user
Keywords: perl chat
Message-ID: <1991May22.164924.25070@mentorg.com>
Date: 22 May 91 16:49:24 GMT
Sender: phil_brooks@mentorg.com
Organization: Mentor Graphics Corporation
Lines: 27

I am new to perl and new to chat and in search of an example using
both.  Say I wanted to do something like connect to a sendmail
daemon on another machine and see if it is alive.  I can do this
using telnet as follows:

$ telnet ptd 25
Trying 137.202.54.21...
Connected to ptd.
Escape character is '^]'.
220 ptd-hub.PTD.MENTORG.COM HP Sendmail (16.6/15.5+IOS 3.20) ready at Wed, 22 May 91 09:36:35 -0700:
helo
250 ptd-hub.PTD.MENTORG.COM Hello  (pbrooks.ptd.mentorg.com), pleased to meet you
quit
221 ptd-hub.PTD.MENTORG.COM closing connection
Connection closed by foreign host.
$

From what I have seen, it looks like chat would be a good way to do this.
The timeout value would get around problems with hung servers etc.  
Can someone post an example?


-- 
Phil Brooks, Mentor Graphics Corporation 
(phil_brooks@mentorg.com)
8005 SW Boeckman Road
Wilsonville, OR   97070-7777 (503) 685-1324