HyperEstraier の Perl Binding を使ってみた。Hyper Estraier になって、色々外部のプログラムからも扱いやすくなっているようなので、いまさらながら試してみました。 プログラミングガイド だけでは良くわからなかったのと、Perl でやってる人が見付からなかったので、ここにサンプルを載せておきます。 単純にデータベースを開いて、検索を実行し、パスの一覧を表示するだけのスクリプトです。 以下のスクリプトを作成するにあたって、HyperEstraier の Python Binding できた が参考になりました。 #!/usr/bin/perl -w use strict; use HyperEstraier; my $word = shift||die "$0 [keyword]\n"; # データベースを開く my $db = new HyperEstraier::Database; $db->open('casket',
