Re: ApacheのLAN環境でのCGIテストについて
渋谷さま、ありがとうございます。
グループも適切ではなかったようで申し訳ありません。
末尾に .cgi/ を追加しましたのは最後に「/」を入力しても
それもCGIファイルとして扱うように、というつもりなのですが、、。
(当初は .cgi だけでしたがソースの一部が表示されますので
付け加えてみました。)
CGIスクリプトファイルとそのディレクトリのパーミッションは
755です。問題のCGIのファイル名はget1.cgiです。はじめて
作りましたCGIでフォームからの入力をデコードして表示させる
というものです。
telnetでWindows98から接続し、
perl -cw get1.cgi でシンタックスエラーが無いことを
確認してから、
perl get1.cgi でHTMLが出力されるのを確認しています。
その確認は次の通りです。
$ perl get1.cgi
Content-type: text/html
<HTML>
<TITLE>デコード結果:/TITLE>
<BODY>
<H1>デコード結果:/H1>
value1 = ('value1')<BR>
value2 = ('value2')
</BODY>
</HTML>
$
get1.cgi のソースは次の通りです。
#!/usr/bin/perl
require 'cgi-lib.pl';
&ReadParse(*input_data);
print "Content-type: text/html\n\n";
print "<HTML>\n";
print "<TITLE>デコード結果</TITLE>\n";
print "<BODY>\n";
print "<H1>デコード結果</H1>\n";
print "value1 = $input_data('value1')<BR>\n";
print "value2 = $input_data('value2')\n";
print "</BODY>\n";
print "</HTML>\n";
exit;
これの出力は
#!/usr/bin/perl require 'cgi-lib.pl'; &ReadParse(*input_data); print
"Content-type: text/html\n\n"; print "\n"; print "\n"; print "\n"; print "
デコード結果
\n"; print "value1 = $input_data('value1')
\n"; print "value2 = $input_data('value2')\n"; print "\n"; print "\n"; exit;
のように表示されます。
このうちデコード結果はちゃんと大きな文字になっています。
以上のような状況です。
訳がわからなくて本当に困っています。
どうぞよろしくお願いします。
----rei
Fnews-brouse 1.9(20180406) -- by Mizuno, MWE <mwe@ccsf.jp>
GnuPG Key ID = ECC8A735
GnuPG Key fingerprint = 9BE6 B9E9 55A5 A499 CD51 946E 9BDC 7870 ECC8 A735