- ベストアンサー
※ ChatGPTを利用し、要約された質問です（原文：伝言掲示板の作成（超初心者です））
掲示板作成の超初心者のための疑問
このQ&Aのポイント
- 授業の課題で伝言掲示板を作るための質問です。
- 伝言掲示板の作成に行き詰まっているので助けが必要です。
- 書き込み内容の指定や前の書き込みの保持方法について教えてください。
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
write.cgiの 「open(OUT, ">contents.txt");」の部分が間違っています。 「>」一つですと新規作成状態で開くので、 ファイルの中身は空になってしまいます。 追記したい場合は「>>」と書きます。 perlから離れて久しいので 判断が必要かどうかいまいち自信が無いのですが、 下の様に変更すれば前の書き込みは消えなくなります $FileName = "contents.txt"; # すでにファイルが存在する時は追記 if(-f $FileName){ open(OUT, ">>".$FileName); } # ファイルが無い時は新規作成 else{ open(OUT, ">".$FileName); } …が、いつまでも最初の書き込みが消えないため 表示も最初の書き込みのままになってしまいますので、 read.cgiで最後の書き込みを取り出すように処理を取り出す必要があります。 あと装飾についてですが、 書込みのフォームを装飾したい場合はwrite.htmlを 表示を装飾したい場合はread.cgiの表示を変更します。
お礼
回答ありがとうございます。 これからやってみようと思いますが、 なかなか難しいんですね・・・。