namazu-dev(ring)

[knok@xxxxxxxxxxxxx (NOKUBI Takatsugu)]

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

>>   gzipのPATHをconfigureで調べる方法に付いては了解です。明日にでもその
>> ように修正します。

  先程修正しました。

>>   以前高林さんがMLでかかれていた、@INCからファイルの存在を調べる方向で
>> ちょっと考えてみます。

  gzip.pl内部に以下のような関数を試験的に実装してみました。
checklib('Compress/Zlib.pm')といった感じで使います。

sub checklib ($) {
    my $libfile = shift;
    for my $path (@INC) {
        my $cpath = "$path/$libfile";
        return 1 if -e $cpath;
    }
    return 0;
}

  最終的にはlib/conf.pl辺りにいれましょう。
-- 
野首 貴嗣
E-mail: knok@xxxxxxxxxxxxx (private)
        nokubi@xxxxxxxxx (official)