This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Encode::FB_QUIET
authorTatsuhiko Miyagawa <miyagawa@edge.co.jp>
Wed, 17 Jul 2002 18:25:01 +0000 (03:25 +0900)
committerJarkko Hietaniemi <jhi@iki.fi>
Wed, 17 Jul 2002 12:18:24 +0000 (12:18 +0000)
Message-ID: <86adoq4sgi.wl@mail.edge.co.jp>

p4raw-id: //depot/perl@17591

ext/Encode/Encode.pm

index 4080238..635de30 100644 (file)
@@ -552,7 +552,7 @@ buffer. Here is some sample code that does exactly this:
   while(defined(read $fh, $buffer, 256)){
     # buffer may end in a partial character so we append
     $data .= $buffer;
-    $utf8 .= decode($encoding, $data, ENCODE::FB_QUIET);
+    $utf8 .= decode($encoding, $data, Encode::FB_QUIET);
     # $data now contains the unprocessed partial character
   }