more complete File::Spec support for Mac and VMS, tests (from

[p5sagit/p5-mst-13.2.git] / lib / byte.pm

diff --git a/lib/byte.pm b/lib/byte.pm
index cc23b40..0424e17 100644 (file)
--- a/lib/byte.pm
+++ b/lib/byte.pm
@@ -1,11 +1,11 @@
 package byte;
 
 sub import {
-    $^H |= 0x00000010;
+    $^H |= 0x00000008;
 }
 
 sub unimport {
-    $^H &= ~0x00000010;
+    $^H &= ~0x00000008;
 }
 
 sub AUTOLOAD {
@@ -20,7 +20,7 @@ __END__
 
 =head1 NAME
 
-byte - Perl pragma to turn force treating strings as bytes not UNICODE
+byte - Perl pragma to force byte semantics rather than character semantics
 
 =head1 SYNOPSIS
 
@@ -29,5 +29,22 @@ byte - Perl pragma to turn force treating strings as bytes not UNICODE
 
 =head1 DESCRIPTION
 
+WARNING: The implementation of Unicode support in Perl is incomplete.
+Expect sudden and unannounced changes!
+
+The C<use byte> pragma disables character semantics for the rest of the
+lexical scope in which it appears.  C<no byte> can be used to reverse
+the effect of C<use byte> within the current lexical scope.
+
+Perl normally assumes character semantics in the presence of
+character data (i.e. data that has come from a source that has
+been marked as being of a particular character encoding).
+
+To understand the implications and differences between character
+semantics and byte semantics, see L<perlunicode>.
+
+=head1 SEE ALSO
+
+L<perlunicode>, L<utf8>
 
 =cut