みんなの「教えて(疑問・質問)」にみんなで「答える」Q&Aコミュニティ

こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

締切り済みの質問

HTML文のOptionボタン値の抽出

出力イメージ通りに出力したいのですが、Perl の print 構文が正しくない
ようで思った通りに出力してくれません。
どなたか教えて頂けないでしょうか?

■ [検索]ボタンをクリックした後の出力イメージ ■
Hello
平成18年
bye

■ メニューのHTML文 ■
<HTML>
<HEAD></HEAD>
<BODY>
<FORM action="select.pl" NETHOD="POST">
<SELECT name="combo1">
<OPTION value="8">平成17年</OPTION>
<OPTION value="9" selected>平成18年</OPTION>
</SELECT>
<INPUT type="SUBMIT" name="SUBMIT" value="検索">
</FORM>
</BODY>
</HTML>

■ select.pl ■
#!C:/Perl/bin/perl
use CGI;
print "Content-type: text/html\n\n";
print "<html><body>\n";
print "Hello<BR>\n";
print $form->param('combo1') . "<BR>\n"; ← ここの構文が不明
print "bye<BR>\n";
print "</body></html>\n";

投稿日時 - 2006-07-19 10:12:53

QNo.2285171

困ってます

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

ANo.1

そもそも$formという変数はどこから来たのでしょうか。

use CGI;
はモジュールを呼んでいるだけですよね。

use CGI;の下に以下の行を追加すればよいのではないでしょうか。
my $form = new CGI;

投稿日時 - 2006-07-19 10:23:25

お礼

手元に良いサンプルがなくて、色々なモジュールを組み合わせてましたので
完全に見落としてました。
教えて頂きましてありがとうございます。
解決しました。

投稿日時 - 2006-07-19 11:02:44