Changeset 4162

Timestamp:

01/07/08 09:47:37 (5 years ago)

Author:

hiroyukim

Message:

\n じゃなくて \0 でした。

Files:

• lang/perl/Mezasi/trunk/lib/Mezasi/Freq.pm (modified) (1 diff)

lang/perl/Mezasi/trunk/lib/Mezasi/Freq.pm

@@ -82 +82 @@
     }
     else {
-        while( $self->{buf} =~ /($str)[^\n]?/gio ) {
+        while( $self->{buf} =~ /($str)[^\0]?/gio ) {
             $freq->{$1} += 1;
         }