何で出来ないか分かりません
PerlおよびＣＧＩを最近はじめました。教科書を見ながら作っているのですが、ファイルへの書き込み・読み出しがよく分からないので、質問しました。
1つのページにラジオボタンが2箇所あり、それぞれ選択後「送信」ボタンを押して次のページへ行くのですが、ボタンの情報をファイルに書き込みたいのですがうまくいきません。
プログラムは、
print startform(
-method => 'POST',
-action => 'menu.cgi',
);
print blockquote(
radio_group(
-name => 'Ａ',
-values => [ '１', '２', '３', '４', '５' ],
-default => '１',
-linebreak => 'true',
)
);
print hr;
print blockquote(
radio_group(
-name => 'Ｂ',
-values => [ 'a', 'b', 'c', 'd', 'e', 'f','g', 'h' ],
-default => 'a',
-linebreak => '',
)
);
print hr;
print br;
print submit(
-value => '送信',
);
print reset;
print hidden(
-name => 'type',
-value => '',
);
print end_form;
print end_html;
#-----------------------------------------
open ( NEW, '> data.txt' ) or die "$!\n";
print NEW "$gakka, $gakunen, $type";
close ( NEW );
・・・という感じです。途中の『hidden』は次のページで必要なものです。
このままやると、『data.txt』は作られるのですが、
, ,
という内容になってしまいます。
初歩的なこととは思いますが、いろいろ試しても出来ませんでした。よろしくお願いします。
お礼
ですよね！ さっそくの回答ありがとうございます。