No.2ベストアンサー
- 回答日時:
どういう環境でCGIを動かしているのかわかりませんが、比較的どんな環境でも動くスクリプトを書いてみました。
最初の5つの変数だけ書き換えればメールを送れます。ただし、Net::SMTP.pm (これは libnet で入ります), MIME::Entity.pm, Jcode.pm が必要になります。
ちょっといい参考文献が見つからなかったので下記URLをあげましたが、SMTPプロトコルやそのたメールの知識が必要となります。必要なモジュールさえ揃っていればこのサンプルコードの方が簡単かと思われます。
#!/usr/local/bin/perl -w
use strict;
use Net::SMTP;
use MIME::Entity;
use Jcode;
my $from_address = 'from@address';
my $to_address = 'to@address';
my $from_name = '送信者';
my $subject = '件名です';
my $body =<<BODY;
本文です、本文。
半角文字や機種依存文字に注意。
BODY
my $smtp_host = $from_address; $smtp_host =~ s/^.*?\@//;
my $smtp = new Net::SMTP($smtp_host, Timeout => 10) or die;
$smtp->mail($from_address);
$smtp->to($to_address);
$smtp->data();
my $mime = MIME::Entity->build( From => Jcode->new($from_name)->mime_encode . " <$from_address>"
, To => $to_address
, Type => 'text/plain; charset=ISO-2022-JP'
, 'Content-Transfer-Encoding' => '7bit'
, Subject => Jcode->new($subject)->mime_encode()
, Data => Jcode->new($body)->h2z->jis()
);
$smtp->datasend($mime->as_string());
$smtp->quit();
参考URL:http://www.fc-lab.com/network/program/perl/mail. …
No.1
- 回答日時:
perlやCGI・OSの事が分かっていれば簡単です。
UNIX系ならsendmailをパイプでオープンして内容を出力してやれば送信できます。
・・・と書いても漠然としすぎて分からないでしょね。
とりあえず『CGI メール送信』で検索してみてください。
とても沢山出てきます。
フォームからCGIを呼び出しメール送信するPerlプログラムがフリーでDL出来るので参考になると思います。
その部分を注文CGIに組み込めば比較的簡単に実現できます。
インターネットメールでは、宛先等のヘッダ部分に単純な漢字コードは含めることが出来ないので、MIMEエンコードに対応したサンプルをダウンロードしてください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Net::SMTPでのメール送信について
-
Net::SMTPでメール配信できる限...
-
ビジネスメールの敬称
-
お問い合わせフォームから送信...
-
初歩的な事だと思います。 Sub...
-
Excel-VBAでInputBox+Pulldown...
-
「イ分」・・・フンという文字...
-
テキストボックスの番号を使っ...
-
DATE型変数を初期化する方法
-
数字以外の入力をエラーにする...
-
VBAでInputBoxの再入力をさせる...
-
Googleフォームを回答したか確...
-
excel vba でユーザーフォーム...
-
htmlからbatファイルを起動する
-
DataGridViewの桁数制限に関して
-
チェックボックスのCheckedとCh...
-
ホームページビルダーのメール...
-
アクセスのマクロ
-
DataGridView 列ごとの入力制限
-
エクセルVBA テキストボックス...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
PerlでSMTP-AUTH認証をする
-
cgi 実行時のエラー
-
Net::SMTPでメール配信できる限...
-
Net::SMTPでのメール送信について
-
GmailのSMTPを用いたメールフォ...
-
Perl メール件名について
-
telnet gmail
-
DelegateでPOP3、SMTPのリバー...
-
CGI通販サイト、注文完了時に確...
-
qmailで外部へ送信できなせん
-
Yahoo! にメールを送信できない。
-
ビジネスメールの敬称
-
エクセルVBA テキストボックス...
-
お問い合わせフォームから送信...
-
DATE型変数を初期化する方法
-
テキストボックスの番号を使っ...
-
初歩的な事だと思います。 Sub...
-
Excel-VBAでInputBox+Pulldown...
-
数字以外の入力をエラーにする...
-
VBAでInputBoxの再入力をさせる...
おすすめ情報