⭐ in reply to How do I send e-mail from my Perl Program?

use strict; # ALWAYS!
use Net::SMTP; # Yes, this will work on windows.

# You need to fill in the variables.
# Read the perldoc for more info on using SMTP.

my $smtp = Net::SMTP->new('$mailserver_url') or die $!;
$smtp->mail( $from );
$smtp->to( $to );
$smtp->data();
$smtp->datasend("To: $to\n");
$smtp->datasend("From: $from\n");
$smtp->datasend("Subject: $subject\n");
$smtp->datasend("\n"); # done with header
$smtp->datasend($message);
$smtp->dataend();
$smtp->quit(); # all done. message sent.

[download]

Replies are listed 'Best First'.
Re: Answer: How do I send e-mail from my Perl Program?
by cLive ;-) (Prior) on Jan 14, 2002 at 10:16 UTC
    Small error: 
    my $smtp = Net::SMTP->new('$mailserver_url') or die $!;

    [download]
    should be: 
    my $smtp = Net::SMTP->new($mailserver_url) or die $!;

    [download]
    or 
    my $smtp = Net::SMTP->new("$mailserver_url") or die $!;

    [download]
    Single quotes aren't interpolated!

    cLive ;-)

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom