nDiki : Tie::File

Perl Devel::SmallProf Makefile.PL wxPerl WiKicker WWW::Mechanize::Cached Perl でキャッシュ処理 Perl でデータベース処理 ビルド Term::ProgressBar 統計 Locale::Maketext Module::CoreList Devel::Cover CGI プログラム CGI.pm 検索 PPM::Make Perl 5.005_03 IPC::ShareLite アクセスログ ドラマ Perl で XML ExtUtils::MakeMaker Palm::Progect Palm 開発 Apache IPC::Semaphore Storable

■ [ WiKicker ] 「最近のアクセスログ」処理思案

今のところ WiKicker 自体にはアクセスログ機能はなく、Apache のそれに頼っている(NaneyOrgWiki ではサーバ側で combined log を提供していないので別途自前で、似非 combined log を吐かせている)。

1日毎程度のアクセス統計チェックはこれでまぁある程度済むのだが、それとは別に瞬間的なアクセス状況を知りたい時がままある。 特にサーバの負荷が上がりつつある時は

• 特定のホストから連続的なアクセスがないか?(ロボットなど)
• 特定のページのリクエストが一時的に増えているのでは?(ドラマ放映終了直後など)
• 特定の訪問者がリロードしまくってないか?(チャット等と勘違いして)

などをチェックしたい。 ロボットのアクセスがひどい場合は早急にはじく必要があるし。 しかし、生アクセスログの目視チェック(+grep etc)では限界がある(wiki のURIはページ名がエスケープされているからパッと見どのページかわからないし)。

ということで、直近のログを簡単にチェックできるような機能を検討。 まずはログをどこに取るか。 複数のCGI プログラムのプロセスから、ガシガシ書ける必要有り。

• 普通のファイル
• daemon
• mmap
• 共有メモリ

あたりか。 直近の数百アクセスだけあれば良く、逆にそれ以上のログはばんばん破棄したいのだが何が一番いい実装かなぁ。

シンプルに普通のファイルに append するのが一番楽だが、ログが増えると tail を取るのが遅くなるだろうし、ログを切り詰めるのも面倒。 Perl の Tie::File を使うとファイルの各行を配列要素に見立てて push、 unshift、splice ができるのだが、やはり切り詰めに時間がかかりすぎる。

使えそうなモジュールがないかいろいろCPANを検索して、とりあえずどんどんビルドしてみる(サーバの Perl が 5.005_03 なので、目的にあっても使えないかもしれないし)

• CGI プログラム、Out of memory! に泣く (2001-01-04)
• FreeBSD と Apache::Htpasswd (2006-03-02)
• www.naney.org サーバ断続的にダウン (2006-04-30)
• Perl CGI プログラムのテストには WWW::Mechanize::... (2006-02-18)
• [ WiKicker ] SpeedyCGI (2003-10-17)