input関数でファイルからのデータを表示したい

[新着] Webテンプレートを仮オープンしました



0   名前: ひろと : 2007/05/13(日) 08:51  ID:XWRGC4a9 sub-bK
perl初心者です。
valueの中にあらかじめ入力したデータを入れておきたいのですが出来ません。
データ内容は、ファイルから持ってきてます。
このプログラムで画面を表示すると入力エリアに 【$kan】って入ります。
$kanのデータの中身は 【0001】って入っているのでこの内容を表示したいです。
このような場合、何か方法があるのですか? 
誰か教えてください。 お願いします。

ちなみにperlの記述は・・
sub put22{
$kan = sprintf("%8d", $kanri);
$pas = sprintf("%8d", $pass);
print "管理者ID  ";
print '<INPUT TYPE="text" NAME="U-ID" value=$kan>';
print "<br>数字4桁で入力してください。<br><br>";
print "パスワード  ";
print '<INPUT TYPE="password" NAME="Pass" value=$pas>';
print "<br>数字4桁で入力してください。<br><br><br>";
print '<input type="checkbox" checked="checked" name="hold" VALUE="HOLD" />';
print "ID,パスワードを保存する。<br><br><center>";
print '<INPUT TYPE="submit" VALUE="送信">';
print "</center></FORM><br></td></tr></table></body></html>";
}



1   名前: 匿名 : 2007/05/13(日) 08:51  ID:idevM9Zk sub-Cz
Perl 入門の最初の 5 ページくらいを読み返して下さい。「'」と「"」は、役割が違いますよね。

# あと変数は my 宣言しておけとか諸々。
# それと、table 要素の上部を省略したことを考慮したとしても、出力 HTML が致命的に間違っています。HTML と XHTML の違いを思い出して下さい。

2   名前: ひろと : 2007/05/13(日) 08:51  ID:XWRGC4a9 sub-bK
匿名さん ありがとうございました。

ちゃんと表示できるようになりました。
print '<INPUT TYPE="text" NAME="U-ID" value=$kanri>';
          ↓
print "<INPUT TYPE='text' NAME='U-ID' value=$kanri>";
に換えればよかったのですね。
すごく初歩的なミスをしてました。

変数のmy宣言はまだわからないので、本を読み返して調べます。
大変ありがとうございました。

一覧へ戻る