As Jenda mentioned your exchange server might not support SMTP. You may also run into mail relay problems with exchange if you don't authenticate with a DOMAIN. Also it's very likely that exchange is not configured to relay outside the company. For simple mail messages I use Mail::Sendmail
# Exchange relays this fine INSIDE the company which is all I need use Mail::Sendmail; $mail{Smtp} = 'mailserver'; # override sendmail.pm my $domain = 'yourdomain.com' my $user = 'your name' $mail{From} = "$user\@$domain" ; $mail{To} = "$user\@$domain" ; $mail{Subject} = "Test Mail" ; $mail{Message} = "foo"; $mail{Message} .= "bar \n"; sendmail %mail ; if ($Mail::Sendmail::error) { print "content of \$Mail::Sendmail::error:\n$Mail::Sendmail::error\n"; } exit 0; > -----Original Message----- > From: Jenda Krynicky [mailto:[EMAIL PROTECTED]] > Sent: Friday, February 15, 2002 10:57 AM > To: '[EMAIL PROTECTED]' > Subject: Re: Mail::Sender on WinNT - can't connect > > > From: "murphy, daniel (BMC Eng)" > <[EMAIL PROTECTED]> > > > I've been wanting to send mail from some of my scripts, so I thought > > I'd see how to get it to work. > > > > I chose to use Mail::Sender and am running Perl 5.005_03 from > > ActiveState build 522 (I know, it's old) on WinNT. When I run this > > simple test script: > > > > use Mail::Sender; > > > > ref ($sender = new Mail::Sender > > {smtp => 'srmontana', > > from => '[EMAIL PROTECTED]'}) > > or die "$Mail::Sender::Error\n"; > > > > ------------------ > > > > I get, > > > > connect() failed: Unknown error > > Does that server accept SMTP ? > > If you try > telnet srmontana 25 > do you connect and get a reply something like: > 220 srmontana.emc.com MS Exchange ESMTP server ready. > > If not you'll have to find another server to relay the mail for you. > > > Do things look right? > > Yes. > > > Is there some type of authentication, (userid, password, > etc.) that's > > taking place? There must be, right? > > If the server requires authentication then you cannot use > Mail::Sender. Except if it requires "POP3 before SMTP" or > whatever is it called ... in that case you'd have to connect and log > into the server using Mail::POP3Client or Net::POP3 and then > connect with Mail::Sender. > > Maybe you could try either Win32::MAPI or use Win32::OLE to > control Outlook. > > Jenda > > > =========== [EMAIL PROTECTED] == http://Jenda.Krynicky.cz ========== > There is a reason for living. There must be. I've seen it somewhere. > It's just that in the mess on my table ... and in my brain. > I can't find it. > --- me > > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > > -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]