-Original Message-
From: perl-cgi [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, August 29, 2001 4:49 PM
To: 'James Kelty'
Cc: [EMAIL PROTECTED]
Subject: RE: Perl script to monitor sendmail
I am having problems with this. For some reason the script
connects even
though nothing
To: perl-cgi
Subject: RE: Perl script to monitor sendmail
#!/usr/bin/perl -w
use IO::Socket::INET;
my $sock = IO::Socket::INET-new(PeerAdd = hostname,
PeerPort = smtp(25),
Proto = tcp,
Timeout
Carson
Clinicomp International
Sr. Systems Engineer
San Diego, California
O: +1 (858) 646-2095
F: +1 (858) 297-8570
-Original Message-
From: James Kelty [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, August 28, 2001 10:14 AM
To: perl-cgi
Subject: RE: Perl script to monitor sendmail
#!/usr