0

Perl を使用して Gmail にメールを送信するにはどうすればよいですか? これが私が試していることです:

my $mailer = Email::Send->new(
    {
        mailer      => 'SMTP::TLS',
        mailer_args => [
            Host     => 'smtp.gmail.com',
            Port     => 587,
            User     => 'xxx',
            Password => 'xxx',
        ]
    }
);

use Email::Simple::Creator;    # or other Email::

use File::Slurp;
@arrIrc = read_file("$ircFile");
my $email = Email::Simple->create(
    header => [
        From    => 'xxx',
        To      => "$configList{email}",
        Subject => "The summary of logfile $channelName",
    ],
    body => "@arrIrc",
);
4

3 に答える 3

5

Net::SMTP::SSLを使用して GMail と通信します。

例として、PerlmonksのMIME::Lite インライン イメージを参照してください。

于 2009-10-05T17:52:30.590 に答える
2

MIME::Liteを使用してメッセージを作成し、それをローカルの sendmail プロセスに送信できます。ただし、gmail のサーバーと通信するには、SSL 証明書を設定する必要があります。おそらく、より詳細な手順がsuperuserにあります。

于 2009-10-05T17:50:08.087 に答える