CGIへフォーム内容を渡すスクリプト その1
入力されたデータをブラウザに表示させるスクリプト
フォームのエンコード、デコードにはcgi-lib.plライブラリを使用しています。
ファイルform01.htmlとform01.cgiを作成して下のソースをそれぞれ貼り付けます。
cgi-lib.plをダウンロードしてきて、form01.htmlとform01.cgiと同じフォルダに設置します。 form01.cgiのパーミションを755に変更します。
サンプル
form01.html
<html><head><title>名前の問い合わせ</title></head> <body> <h3>あなたのお名前を教えてください。 <form method=get action="form01.cgi"> 入力(ローマ字)=> <input type=text name="yourname"> <input type="submit" value="送信"> </form> </body> </html> |
ソース form01.cgi
#!/usr/bin/perl
require 'cgi-lib.pl';
&ReadParse( *form );
$name = $form{'yourname'};
#htmlを表示
print "Content-type: text/html\n\n";
print "<html><body>\n";
print "こんにちは<b>${name}</b>さん<br>\n";
print "</body></html>\n"
__END__
|
