28. Re: Let's 野ぷ野ぷ （その１）

 極悪トリッポンさん
                                   野ぷ野ぷ キャインです(^^;)

Subject: [TSperl:27] Let's 野ぷ野ぷ （その１）


> これは簡単で、
>
> while(<>){
>     next if m/^[VPBL]:|^'/;
>     print;
> }
>
> というスクリプトを書けばいい。ところで正規表現の中に | を書
> くとスピードが落ちるという話が perlfaq かどこかに書いてあっ
> たと思う。どれくらい違うか試してみる。

　:/ or m/^'/;   と
  | ^'/;
では、スピードは同じなんですか？　あ、これはゴミです。

> 止觀弘決.TXK は 1MB のファイル。ふむ、だいたい 40% くらいの
> 時短になってるようです。でめたしでめたし。

　ほえ〜！　すげー、早い。　なんでだろって考えないようにします。
　素直にならないと(+_+)