★三　【 スクリプト改造工房 PART 9 】　★三at PHP

---

■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
407:nobodyさん 09/02/04 19:33:07 レンタル鯖にてメール送信CGIを設置したくPerlで継ぎはぎしてやってみたんですが、 メールは送信されるのですが、件名とメアドまで本文の方に来てしまって、 件名が（無題）で送信者がanonymousになってしまいます。 どうやったら件名とメアドを認識してくれるのでしょうか？ HTMLの入力フォームは、名前、メアド、件名、本文の４つだけです。 408:404 09/02/04 19:36:06 KFPddoVr >>405 解答ありがとうございました。頑張ってみます！ 409:nobodyさん 09/02/04 19:36:17 ソースをさらせばいい ↓そのソースじゃねーＹＯ！ 410:nobodyさん 09/02/04 20:04:10 >>409 ｿｰｽさらします。Perl知らないんでこれが限界っす･･･。 #!/usr/bin/perl $mailprog = '/usr/sbin/sendmail'; require 'jcode.pl'; #Get the input read (STDIN, $buffer, $ENV{'CONTENT_LENGTH'}); #Split the name-value pairs @pairs = split (/&/,$buffer); foreach $pair(@pairs) { ($name, $value) = split(/=/, $pair); #Un-Webify plus signs and %-encoding $value=~tr/+/ /; $value=~s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg; $FORM{$name} = $value; if ( $name ne "to" ) { push (@fields, $name) unless (grep(/^$name$/, @fields)); } } # set recipient address if form is blank $to = $FORM{'to'};

---

次ページ

最新レス表示

レスジャンプ

類似スレ一覧

スレッドの検索

話題のニュース

おまかせリスト

オプション

しおりを挟む

スレッドに書込

スレッドの一覧

暇つぶし2ch