匿メール機能にログ機能を追加したい
現在、c-boardというCGIを改造しています。
匿メール機能を悪用されないように
匿メール送信ログをとりたいと思い、書き換えを行っているのですが
どうもうまく記録されません。
もしお分かりになる方がおりましたらご教授ください。
cmd/hml.plの
#── ジャンプ
&BASE::location("$CNF::place{'this'}{'url'}?id=$::FORM{'id'}");
}
の下に
@mailnaiyou=($name, $email, $subject, $body, $host, $agent, $eznumber, $sbnumber, $imobilenumber, $imodeid);
open (OUT,">> /data/maillog.txt");
print OUT @mailnaiyou;
close (OUT);
を追加してdataフォルダ内に
maillog.txtを設置してみました。
お礼
ありがとうございます。でもこれは知ってるんです。ほかにないですか？？