メーリングリストでReply-To:やFrom:,To:の値が返ってこない。

解決済

質問者：ctpsys
質問日時：2002/09/15 18:40
回答数：3件

メールで受信して、Reolay-To: From: To:を設定しているのですが、
webサーバーのno-body@www.cgi.ne.jpなどの名前しか返ってこないのです。何処がおかしいか分かりません。設定の仕方を教えて下さい。

スクリプトは以下の通りです。

#!/usr/local/bin/perl
BEGIN {use KCatch qw(source);}

$sendmail='/usr/sbin/sendmail';
$myaddress='info@********.com';

require '/usr/local/lib/perl/cgi-lib.pl';
require '/usr/local/lib/perl/jcode.pl';

&ReadParse;

$subject=$in{'currentValue'};
$campany=$in{'campany'};
$name=$in{'name'};
$mailfrom=$in{'mailfrom'};
if($mailfrom !~/.+@.+\..+/){&error('メールアドレスの記述ミスです。');}
$url=$in{'url'};
if($url!~/^http\:\/\//){&error('URLの記述ミスです。');}
$inquiry=$in{'inquiry'};
$inquiry=~s/</</g;
$inquiry=~s/>/>/g;

#########################メール送信
$message=<<END_OF_MESSAGE;
Subject:Message form ********.com Site
From:$mailfrom
To:$myaddress
Reply-To: $mailfrom

[件　　名]：$subject
[e_mail] ：$mailfrom
END_OF_MESSAGE

&jcode'convert(*message,'jis');

open (MAIL,"|/usr/sbin/sendmail -t -oi");
print MAIL $message;
close MAIL;

print <<END_OF_HTML;
Content-type: text/html

<HTML>
・・・以下省略・・・

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (3件)

ベストアンサー優先
最新から表示
回答順に表示

No.3ベストアンサー

回答者： so_blue
回答日時：2002/09/17 19:00

またまたこんにちは。

> なぜか、cgiファイルと同じディレクトリーに　require 'mimew.pl;
> とするだけで、エラーが返ってきます。

もしか、cgi-binディレクトリ（？）で「.pl」の拡張子がcgiとして設定されていないとか、
パーミッションが違うとか？くらいしか思いつかないですが...

require 'mimew.pl; ←ここのクオートが1つ足りないのは、コピー時のミスですよね？

- 0
- 件

通報する

この回答へのお礼

so_blue様　何度も親切に有り難うございます。
感謝します。
ふと、いつかこれは「サーバーの仕様」とかの記述があったような気がしたもので、問い合わせたところ、その様でした。
結局、-fオプションを付けることで解決しました。
open (MAIL,"|/usr/sbin/sendmail -f $mailfrom -t ");
としましたところ、解決しました。
でも、so_blue 様の方法も一度トライさせていただきます。
有り難うございました。

通報する

お礼日時：2002/09/17 20:46

No.2