Knowledgebase

Portal Home > Knowledgebase > Email > How to change a script from using Sendmail to use Net::SMTP instead

How to change a script from using Sendmail to use Net::SMTP instead

To convert a script from using sendmail, to using Net::SMTP, do the following.

Towards the top of the script, add this:
use Net::SMTP;

Then, comment out the Sendmail code that looks like this (shown commented):

#open (MAIL,"|$mailprogram");
#print MAIL "To: $youremail\n";
#print MAIL "From: $FORM{'Email'}\n";
#print MAIL "Subject: Subject goes here\n";
#print MAIL "The body of the email...\n\n";
#print MAIL "goes here.\n\n";
#close MAIL;

Then, add the following code for Net::SMTP to use:

my $MailHost = "smtpmailer.hostek.net";
my $MailFrom = $FORM{'Email'};
my $MailTo = $youremail;
my $subject = "Subject goes here";
my $MailBody = "The body of the email...\n\n";
$MailBody = $MailBody . "goes here.\n\n";

$smtp = Net::SMTP->new($MailHost);

# Send the From and Recipient for the mail servers that require it
print $MailFrom;
$smtp->mail($MailFrom);
$smtp->to($MailTo);

# Start the mail
$smtp->data();

# Send the header.
$smtp->datasend("To: $MailTo\n");
$smtp->datasend("From: $MailFrom\n");
$smtp->datasend("Subject: $subject\n");
$smtp->datasend("\n");

# Send the message
$smtp->datasend("$MailBody\n\n");

# Send the termination string
$smtp->dataend();
$smtp->quit;


That should be it.

Add to Favourites    Print this Article

ASP.NET 1.1 - code to send email via script (Views: 2485)

How to subscribe/unsubscribe from a list (Views: 7238)

How to Change the SMTP port in Entourage (Views: 1502)

Using .NET 2.0 to send an email (Views: 1586)

Does the SmarterMail SPAM filtering work on Alias/Forwardings as well as Users? (Views: 2388)