namazu-dev(ring)

[Ken-ichi Hirose <kenzo-@xxxxxxxxxx>]

広瀬です。

 <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