さて、羽を伸ばそうか（無理）。 05 Jan 2005

今日から 9 日まで、おくさんと子ども達は北海道までスキーに行ってしまいました。早速、私は散髪を済ませ、家でゴロゴロと・・・していたいのですが、留守中は家中の片付けやら洗濯やら（そうそう幼稚園シューズも洗わなくてはいけない）、で普段よりも忙しかったりします。先月中に届いていた「マルクス・ブラザーズ」 MGM 時代の DVD セットも、この機会を逃したら何時観る事が出来るか分かりません。パラマウント時代の DVD セットも、今度は 5 枚組になって 3 月に出ますし（*1）。
でも結局、帰ってくる前日の夜になって、慌てて片付け始める様な気がしないでもありませんが・・・。

*1 私が初めて購入した VHS ビデオデッキが確か約 20 万円、一緒に購入した「オペラは踊る」のビデオテープが約 2 万円した事を考えると隔世の感があります。今では各々 10 分の 1 以下の金額でより高性能・高画質な DVD プレーヤ、DVD タイトルが揃うのですから。その後 LD タイトルが 1 万円以下で購入出来る事に狂喜したものですが、DVD には及びません。
勿論もっと太古の時代の、個人で映写機とフィルムを揃えて映画を楽しんできたマニアな方々に比べれば、まったくもって取るに足らない話ではあります。

bogofilter を入れてみた 05 Jan 2005

日に 100 通近くの迷惑メールが届くようになったので、Mew を 4.1 にバージョンアップしたついでに bogofilter を入れてみた。以下はほとんど何も理解していない（例えば gsl のインストールが必要だったのかどうかは不明とか）自分が、見様見真似で作業した際の覚え書きでしかありません。bogofilter についての情報をお探しの方は、他のもっと素晴しい web が一杯ありますのでそちらをお勧めします（Google 先生に bogofilter の質問をする）。

# tar zxvf gsl-1.6.tar.gz -C /tmp &&
  cd /tmp/gsl-1.6 &&
  ./configure &&
  make &&
  make install

# tar zxvf qdbm-1.8.19.tar.gz -C /tmp &&
  cd /tmp/qdbm-1.8.19 &&
  ./configure &&
  make &&
  make install

# tar zxvf bogofilter-0.93.3.1.tar.gz -C /tmp &&
  cd /tmp/bogofilter-0.93.3.1 &&
  ./configure --with-database=qdbm &&
  make && 
  make install

$ cd ~/Mail/trash &&
  find . -type f -exec sh -c 'cat {} | nkf -m -e | kakasi -w | bogofilter -s' ';'

$ cd ~/Mail/ham &&
  find . -type f -exec sh -c 'cat {} | nkf -m -e | kakasi -w | bogofilter -n' ';'

# cat > /usr/local/bin/bogo-ham << "EOF"
#!/bin/sh
nkf -m -e | kakasi -w | bogofilter -n
EOF

# cat > /usr/local/bin/bogo-spam << "EOF"
#!/bin/sh
nkf -m -e | kakasi -w | bogofilter -s
EOF

# cat > /usr/local/bin/bogo-check << "EOF"
#!/bin/sh
for file in $@
do
  cat $file | nkf -m -e | kakasi -w | bogofilter
  if [ $? -eq 0 ]; then
    echo $file
  fi
done
EOF

# cd /usr/local/bin
  chmod 755 bogo-ham bogo-spam bogo-check &&
  chown root.root bogo-ham bogo-spam bogo-check

(type) "
Command opts pattern: bogo-check

(type) |
Shell command on message: bogo-ham

(type) |
Shell command on message: bogo-spam