147. Re: txtsearch Ver.0.6アップロード

極悪です。

小出しにしてすみませんが、今朝自分で pdfsearch.pl を書いてて
思い出しました。Pod/perlop.html#qr/string/imosx に載ってる方
法です。qr// って比較的新しいので、あまり使いたくないかな。
もちろん、検索するパターンが正規表現になってないと効果があり
ません。

D:%timer "perl txtsearch2 -w [pP]erl > hoge2.html"
43.171000 sec
D:%timer "perl txtsearch -w [pP]erl > hoge.html"
53.437000 sec
D:%timer "perl txtsearch2 -w [pP]erl > hoge2.html"
43.421000 sec
D:%timer "perl txtsearch -w [pP]erl > hoge.html"
53.453000 sec
D:%diff txtsearch txtsearch2
97a98,99
> @strings      = map(qr/$_/,@strings);
>

D:%diff hoge2.html hoge.html

D:%


閑舎 さんの [TSperl:145] txtsearch Ver.0.6 アップロード から
>  - Web モードで検索語に色をつける。

この色がつくのが見やすいですね。Win2000 のコマンドプロンプト
でも色がつかないかな。何でエスケープシーケンス使えないんだろ
う＞cmd.exe。
-- 
FZH01112@..., http://homepage1.nifty.com/dune/