何年かぶりに、Perlからメール送信のプログラムを作ってる。 今まではsendmailコマンドをたたいてたけど、昨今の状況だと、適当なサーバーからのsendmailは迷惑メールとして扱われる。 ということで、「差し出し元のEmailアドレスの正規のsmtpサーバー」に接続してメール送信を行うことにします。smtp authやらサブミッションポートやらがあるので、 Net::SMTP を使用。 Authen::SASL も忘れずにインストール。これが無くてもエラーは出ないが、動作しない。(オイ!) これで、はまる人多い。(auth – World Wide Walker) 送信ポートの指定も、はまる所のようだ。(G-chan Square – [perl] Net::SMTPでメールを送ろう) 本家のドキュメントには書いてないが、実際はポートの指定が出来るようだ。 普通はSMTPサーバーのポ