namazu-dev(ring)

[knok@xxxxxxxxxxxxx (NOKUBI Takatsugu)]

<199911100810.RAA19258@xxxxxxxxxxxxxx>の記事において
私は書きました。

>>   現時点で把握できている問題として、call_search_main が array をうまく
>> 返せていない、と言うものがあります。
>> 
>> # どこかに参考になりそうなモジュールがないか調べてみよう...

  Wais を参考にしてとりあえず動くものができました。使い方はこんな感じ
です。

use Search::Namazu;

@hlists = Search::Namazu::Search(index => '/index/dir', query => 'str');
foreach my $x (@hlists) {
	print join(', ', $x->uri, $x->score, $x->date, $x->rank) . "\n";
}
-- 
野首 貴嗣
E-mail: knok@xxxxxxxxxxxxx (private)
        nokubi@xxxxxxxxx (official)