Admin: Created page with "If your system has a sendmail compatible MTA installed you can use it in conjunction with the Perl script below to send an Email using Perl.

 #!/usr/bin/env perl   $to = 'to@example.com'; $from = 'from@example.com'; $subject = 'Sent with Perl and Sendmail'; $message = 'This is test email sent using Perl and Sendmail.';   open(MAIL, "|/usr/sbin/sendmail -t");   # Email Header print MAIL "To: $to\n"; print MAIL "From: $from\n"; print MAIL "Subject: $subj..."

2023-10-04T11:53:39Z

Created page with "If your system has a <code>sendmail</code> compatible MTA installed you can use it in conjunction with the Perl script below to send an Email using Perl. <pre> #!/usr/bin/env perl $to = 'to@example.com'; $from = 'from@example.com'; $subject = 'Sent with Perl and Sendmail'; $message = 'This is test email sent using Perl and Sendmail.'; open(MAIL, "|/usr/sbin/sendmail -t"); # Email Header print MAIL "To: $to\n"; print MAIL "From: $from\n"; print MAIL "Subject: $subj..."

New page

If your system has a <code>sendmail</code> compatible MTA installed you can use it in conjunction with the Perl script below to send an Email using Perl.

<pre>
#!/usr/bin/env perl

$to = 'to@example.com';
$from = 'from@example.com';
$subject = 'Sent with Perl and Sendmail';
$message = 'This is test email sent using Perl and Sendmail.';

open(MAIL, "|/usr/sbin/sendmail -t");

# Email Header
print MAIL "To: $to\n";
print MAIL "From: $from\n";
print MAIL "Subject: $subject\n\n";
# Email Body
print MAIL $message;

close(MAIL);
print "Email Sent!\n";
</pre>

As you can see, you can just fopen the sendmail program as if it were a file and print to it the same way you'd print to a file, then close it the same way you'd close a file to send.

[[Category: Sending an Email with...]]

Sending an Email with Perl via Sendmail - Revision history