Perlで記述したSSL/TSLをサポートしたメール送信スクリプトです。
API仕様 †
呼び出し形式 †
send_mail( $mail_server, $mail_from, $mail_to, $mail_cc, $mail_bcc, $subject, $message, $ssl [,$user, $pass] ) | SMTPサーバアドレス 差出人メールアドレス 受取人メールアドレス(複数指定の場合は、","で区切る) カーボンコピー(複数指定の場合は、","で区切る) ブラインドカーボンコピー(複数指定の場合は、","で区切る) 題名 本文 0:sslを使用しない、1:sslを使用する、2:tlsを使用する ユーザ名(authを使用する) パスワード(authを使用する) |
[]内は省略可能。省略の場合は認証なし
パラメータ詳細 †
パラメータ | 内 容 | 記 事 |
$mail_server | SMTPサーバのアドレスを指定します。IPアドレス直接表記またはFQDN名で指定します。 | ASCII |
$mail_from | 差出人名を指定します。"山田 太郎 <yamada@hogehoge.com>"の様に記載します。 | UTF-8 |
$mail_to | あて先を指定します。"山田 太郎 <yamada@hogehoge.com>"の様に記載します。 複数のあて先を指定する場合は、メールアドレスをカンマ","で区切り列挙します。 | UTF-8 |
$mail_cc | カーボンコピー(同報先)を指定します。フォーマットは$mail_toと同様です。 | UTF-8 |
$mail_bcc | ブラインドカーボンコピー(他の受信者に表示されない同報先)を指定します。フォーマットは$mail_toと同様です。 | UTF-8 |
$subject | メールの題名を指定します。 | UTF-8 |
$message | メールの本文を指定強います。 | UTF-8 |
$ssl | SSL/TSLの使用の有無を指定します。 0:sslを使用しない 1:sslを使用する 2:tlsを使用する | numeric |
$user | ユーザ認証を必要とする場合、ユーザ名を指定します。ユーザ認証を必要としない場合、省略します。 | ASCII |
$pass | ユーザ認証を必要とする場合、パスワードを指定します。ユーザ認証を必要としない場合、省略します。 | ASCII |
スクリプト本体 †
スクリプト本体は
です。