Tags:Perl
雑談掲示板携帯用ページに、過去ログ閲覧機能追加
このサイトに設置している雑談掲示板は、パソコンからと携帯から見た場合には、違うレイアウトで表示されるようになっていますが、携帯用ページの場合はいくつか機能が制限されています。そこで、携帯端末でも過去ログを閲覧できるように、久々にPerl
プログラムをいじって修正してみました。
これで、雑談掲示板の下の方に『過去ログ表示』のメニューが追加され、携帯端末からでも以前投稿された書き込みが見られるようになったはずです。久々に昔の見てみると、懐かしいなぁ……
雑談掲示板の携帯用ページを更新
雑談掲示板の携帯用ページが使いづらいと感じていたので改造しました。今までは、一つの親記事に対してコメントされた記事はタイトルの一覧だけ表示して、クリック後に内容を表示するようになっていたのだが、ある程度本文を表示するように改造しました。短い文章だとそのまま表示され、ちょっと長めの文章だとリンクをクリックすることで全文を閲覧できます。
意外と本文の途中で切り取るのに苦労しました。文字コードUTF-8のPerl言語で、substr()によって切り取ったマルチバイト文字列の最後の文字が、正常に終了しているかどうかを判断する方法がよく分かりませんでした(汗)そこで、色々と検索して、Perl で UTF-8 文字列をバイト数でカットする（りんけーじ）の記事を参考にして何とか解決。この処理に、タグの文字列途中で切り取った場合の処理を加えて完成。久々にPerlをいじったなぁ……
更新しました
まず、「百人一首確率」のページの名前を「百人一首研究」に変更。そして、ここに新しくコンテンツを2つ追加しました。
1つ目は「運命戦での空札の枚数」。運命戦になった瞬間に空札が何枚存在するかを表にしてみました。計算間違いしている可能性があるので怖いですが……
2つ目は「自陣の配置の枚数」。自陣の配置の枚数を入力して、それにしたがって札を自陣に並べてみるだけです。実用度はあまりないかもしれません。
あと、「百人一首検索」をバージョンアップ。PerlCGIでつくっていたのをPHPに変更。2次元配列を使ってみると結構今までの不具合が解消された。
「百人一首一覧」の昇順降順機能をつけて、検索された文字列を赤く表示するようにした。
今年はバグがない限り更新しないと思います。次に更新するときは、著作権表示の部分を「2003」から「2003-2004」に変える予定。
とりあえず初投稿
ここには更新履歴を書いていこうかと思います。とりあえず、今日はアップロード完了。CGIがたくさんあるので、あまり更新しなくても動きのあるサイトになる……と思う。