namazu-dev(ring)


[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Word97の検索



広瀬です。

 <jun-krb@xxxxxxxxxxxxxx> wrote.
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
>word用、excel用、ppt用を一つのファイルにまとめて、olewep97.plにしました。
>(wep = Word + Excel + Powerpointだけ)

うっ、 Namazu 2.0 & File-MMagic の枠組みに入れたいので別々の方がよいです。。
# file の選定は File-Mmagic に任せたいので。

>GPLも入れました。

ありがとうございます。

>以下の場所に置いてあります。
>http://www.mars.dti.ne.jp/~jun-krb/OfficeWithPerl/Program/olewep97.pl
>いっしょに展開していただけるのならば、このファイルでお願いします。

見ました。
#私とは coding style 随分違う ^^;

これを元に少々(ちょっと多くなるかも知れませんが。。)手を加えて
2.0 に merge したいと思っていますがよろしいでしょうか?


P.S.
ちなみに
#main
die "perl5 $0 <<full_path_file_name>>" unless ($ARGV[0]=~/^[a-z]\:\\/io || $ARGV[0] =~ /^\/\//);

は

use Cwd;
#main
$ARGV[0] = cwd().'\\'.$ARGV[0] unless ($ARGV[0] =~ m/^[a-zA-Z]\:[\\\/]/ || $ARGV[0] =~ m/^\/\//);
$ARGV[0] =~ s|/|\\|g;

等とすると幸せになれるかもしれません :-)

----
Ken-ichi Hirose  kenzo-@xxxxxxxxxx