Category Archives: Perl

YAPC::ASIA TOKYO 2011に参加しました

Read more »

掲示板作成練習 そのver0.01b

とりあえず書いて見れるという,最低限の機能を作ってみました.
外見は動いてますが,中身はスカスカです.
中身については後日のエントリで.

外見

ファイル構成
mibbs
┣lib
┃┣BBSData
┃┃┣IndivisualLog.pm
┃┃┗IO.pm
┃┗Utility.pm
┣bbs.cgi
┣data.txt
┗default.css

適切な英語はわからなかったので機械翻訳です.ごめんなさい.
IndivisualLog.pmが個々の書き込み,IO.pmがログファイルへのアクセスを担当しています.
ファイルロックはまだかけていません.
まだログが新しいログが下に表示されます.

改善点としては,とりあえず
・ファイルロック
・ログは新しいログが上に表示されるのをデフォルトに
・IDとパスワードを使ったログの編集,削除
・パスワードを暗号化して保存(MD5が使えればそれがいいんですが……)
・スレッド形式に対応
この辺を実装すれば,10年前の掲示板に機能的に追いつくんじゃないでしょうか.
最近もこういう掲示板ってまだ使われてますしね.

何をどうしたいか

Perlで掲示板を作るというだけでは,漠然としすぎていてどうしたいか自分でもよくわかりません.
単に掲示板を作る,というだけでも解決しなくてはならない大きな問題がいくつもあるわけですが.

そこで,当面の目標を決めておきます.

まず,トライアンドエラーで掲示板っぽく動くものを作ります.
ここでは,排他ロックや危険文字の排除などは「とりあえず」程度で妥協します.
次に,そこら辺の掲示板にある機能を色々取り込んでみます.
ある程度実装できたら,一段階は終了します.

次のステップでは,それぞれの機能についてもう少し詳しく調査して,
できるだけ安全な動作ができるように試みようと思います.

その後は,それらの経験を踏まえて全体を設計し直してまともなプログラムにしたいとは思ってますが,
そこまで続くかはわからないので,とりあえず夢ということにしておきます.