X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/5b5a256ab100c58f58aab1b20dc1f7777b745fd1..8341ee1e81d127dbdfb6941f86b35b72fab49837:/lib/bytes.pm

diff --git a/lib/bytes.pm b/lib/bytes.pm
index a822279..6dad41a 100644
--- a/lib/bytes.pm
+++ b/lib/bytes.pm
@@ -1,6 +1,6 @@
 package bytes;
 
-our $VERSION = '1.02';
+our $VERSION = '1.04';
 
 $bytes::hint_bits = 0x00000008;
 
@@ -19,9 +19,9 @@ sub AUTOLOAD {
     Carp::croak("Undefined subroutine $AUTOLOAD called");
 }
 
-sub length ($);
-sub chr ($);
-sub ord ($);
+sub length (_);
+sub chr (_);
+sub ord (_);
 sub substr ($$;$$);
 sub index ($$;$);
 sub rindex ($$;$);
@@ -33,6 +33,18 @@ __END__
 
 bytes - Perl pragma to force byte semantics rather than character semantics
 
+=head1 NOTICE
+
+This pragma reflects early attempts to incorporate Unicode into perl and
+has since been superseded. It breaks encapsulation (i.e. it exposes the
+innards of how the perl executable currently happens to store a string),
+and use of this module for anything other than debugging purposes is
+strongly discouraged. If you feel that the functions here within might be
+useful for your application, this possibly indicates a mismatch between
+your mental model of Perl Unicode and the current reality. In that case,
+you may wish to read some of the perl Unicode documentation:
+L<perluniintro>, L<perlunitut>, L<perlunifaq> and L<perlunicode>.
+
 =head1 SYNOPSIS
 
     use bytes;