送信フォーム

Perlで設置していますが、動作していないことが判明。全く気付きませんでした。
本日修正しました。

ちなみに、エラーログをすぐに確認する方法のコードを書いておきます。

BEGIN {
    use CGI::Carp qw(carpout);
    open(LOG, ">>error-log") or
        die("Unable to open error-log: $!\n");
    carpout(LOG);
}

これで、cgiの実行場所にerror-logというファイルにエラー内容が書き出されます。ちなみに、Perlのソースのできるだけ頭のほうで書いておくといいようです。(でも、2行目以降になるかなぁ。)