わたなべです.

matz / caelum.co.jp (Yukihiro Matsumoto) writes:

:|というわけで \W, [^\w] も日本語とマッチさせる patch です. た
:|だし -Kn 時はまだバグってます(眠かったから :-).
:
:これだとまずい点があるので，直してみました．まだ完全だと言う
:自信は無いんですけど．

\W はやっぱり添付の patch を入れないとまずいです. これは 
charset_not じゃなくて notwordchar だから.

ついでに.
CPAN/authors/id/WATANABE/jperl5.003_95-970331.pat.gz
なるものがそろそろミラーされてると思います. jperl も \W と 
[\W] に泣かされた.

-- 
わたなべひろふみ

--- ../ruby-1.0-970331/regex.c	Fri Mar 28 14:46:34 1997
+++ ./regex.c	Wed Apr  2 02:43:36 1997
@@ -2643,6 +2635,8 @@
 	  PREFETCH;
 	  if (IS_A_LETTER(d))
             goto fail;
+	  if (ismbchar(*d) && d + 1 != dend)
+	    d++;
 	  d++;
           SET_REGS_MATCHED;
 	  break;