[Tokyo.pm] 単語を含む文字列の出現回数

[maeda ＠ tokyo.pm.org]

前田です。

>	$uri =~ s|(\w+)|++$WORD{$1} if length($1) >= 5|ge;
>	$uriList =~ s|\t\S*$w\S*\s(\d+)|$WORDREX{$w} += $1|ge;

こういうs///の使い方はないと思う。
どうして足し算の結果を文字列に残す必要があるのか。
while(m//g){...}のつもりだった?

つーかそもそも、$wって\w+なんだから、%WORDと%WORDREXって、
ひとつのURL内で同じ単語が重複して出てきた分しか違わないのでわ?

-------------------------------  Avatar          Md+   d/=□=\.   Md+
 前田 薫    maeda ＠ tokyo.pm.org   75t 170km/h   AFC50  O \*oo*/ "  LG+ LG+
 Tokyo.pm  http://tokyo.pm.org   HeatSink 15   LRM10   .=X￣X=.   LRM10
-------------------------------  Armor 2164      Md+  _|_    _|_  Md+