作者: 閑舎
日時: 2002/9/01(16:53)
dune <FZH01112@...> さん wrote.

> > @strings      = map(qr/$_/,@strings);

なるほど。こちらでも少し速くなりました。よく考えたら、$strings_or なんか
も毎回作成しているのを最初に 1 度作成にすると速いな(^^;。どちらにしても、
速さと移植性を重視して、あまり Perl らしくスキッとしたコーディングになっ
てない部分は大目に見てください。

> この色がつくのが見やすいですね。

1 色だけにしているところを多色刷りにすると面倒で、かつ遅くなりそうなので
キャンセルしてしまった。

# 現在 Mac で作成したテキストファイルは 1 行として読みこんでいて、これだ
# となぜか、'閑' という 1 字のみ検索すると、どでかい Mac のファイルの部
# 分でエラー終了するというバグ(?)が見つかったので修正しました。1 行で
# なく、複数行の扱いにする。もう少ししたらアップします。

--
本田博通(閑舎)
テキストとスクリプトの http://rakunet.org/TSNET/