You might want to try setting Debug and seeing what information is provided:
$smtp = Net::SMTP->new($mailhost, Debug => 1) or die "..."; Bob. -----Original Message----- From: Jeff Zanzinger [mailto:[EMAIL PROTECTED]] Sent: Thursday, February 20, 2003 2:18 PM To: [EMAIL PROTECTED] Subject: SMTP not sending I just installed the windows 2000 server and having trouble sending email from ActivePerl using Net::SMTP or Mail::Sender. The perl program executes without error but no emails are ever sent out. Your guidance is greatly appreciated! Below is the perl program. use Net::SMTP; $smtp = Net::SMTP->new('dci-4vzc25o9dv7.sales. anywhere.com '); $smtp->mail( '[EMAIL PROTECTED]' ); $smtp->to('webmaster@ anywhere.com '); $smtp->data(); # Start the mail # Send the header. $smtp->datasend("To: [EMAIL PROTECTED]\n"); $smtp->datasend("From: [EMAIL PROTECTED]\n"); $smtp->datasend("\n"); # Send the body. $smtp->datasend("Hello, World!\n"); $smtp->dataend(); # Finish sending the mail $smtp->quit; # Close the SMTP connection Please do not hesitate to contact us if you have any problems. Jeff Zanzinger, President Data Connection, Inc. Real Estate School License ZH1001469 321-725-2981 (Phone) [EMAIL PROTECTED] 100% Committed to Customer Satisfaction _______________________________________________ Perl-Win32-Admin mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs _______________________________________________ Perl-Win32-Admin mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
