namazu-dev(ring)

[Hiroshi KOMATSU <sui_feng@xxxxxxxxxxxxx>]

古川さん、こんにちわ。

小松です。

nmzidx.pl ありがとうございました。
下記のコードでテストしましたところ、うまくいきました。
おかげさまで、namazu 2.0 に対応できます。(^^)V

require 'nmzidx.pl';

my $nmz = new nmzidx('/pub/Cnamazu/index2');
my $nw = $nmz->open_word;

map {$score{$_}{$word} = $list{$_}}
    keys %list while defined $nw->read(\$word, \%list);

for my $i (0..150) {
    print '** File no.',$i," **\n";
    for my $j (keys %{$score{$i}}) {
        print $j, ' => ', $score{$i}{$j}, "\n";
    }
}
__END__

# Can't call method "print" on an undefined value at nmzidx.pl line 363.
# というエラーが出たので、nmzidx.pl の 363行目と 364行目はコメントアウト
# しちゃいました。問題ありますでしょうか?

*-------------------------------------------------------
  Hiroshi Komatsu <sui_feng@xxxxxxxxxxxxx>
  URL  http://home2.highway.ne.jp/sui_feng/index.html