diff options
-rw-r--r-- | lib/utf8.pm | 6 | ||||
-rw-r--r-- | lib/vars.pm | 2 | ||||
-rw-r--r-- | pod/perluniintro.pod | 7 |
3 files changed, 8 insertions, 7 deletions
diff --git a/lib/utf8.pm b/lib/utf8.pm index c748a4993f..e0c4ac1966 100644 --- a/lib/utf8.pm +++ b/lib/utf8.pm @@ -56,9 +56,9 @@ Enabling the C<utf8> pragma has the following effect: Bytes in the source text that have their high-bit set will be treated as being part of a literal UTF-8 character. This includes most -literals such as identifiers, string constants, constant regular -expression patterns and package names. On EBCDIC platforms characters -in the Latin 1 character set are treated as being part of a literal +literals such as identifier names, string constants, and constant +regular expression patterns. On EBCDIC platforms characters in +the Latin 1 character set are treated as being part of a literal UTF-EBCDIC character. =back diff --git a/lib/vars.pm b/lib/vars.pm index 233979d264..020568e9e0 100644 --- a/lib/vars.pm +++ b/lib/vars.pm @@ -79,6 +79,8 @@ outside of the package), it can act as an acceptable substitute by pre-declaring global symbols, ensuring their availability to the later-loaded routines. +The C<use vars> does not work for UTF-8 variable names. + See L<perlmodlib/Pragmatic Modules>. =cut diff --git a/pod/perluniintro.pod b/pod/perluniintro.pod index dd3064f6bf..9235495fb1 100644 --- a/pod/perluniintro.pod +++ b/pod/perluniintro.pod @@ -128,10 +128,9 @@ This model was found to be wrong, or at least clumsy: the Unicodeness is now carried with the data, not attached to the operations. (There is one remaining case where an explicit C<use utf8> is needed: if your Perl script itself is encoded in UTF-8, you can use UTF-8 in your -variable and subroutine names, and in your string and regular -expression literals, by saying C<use utf8>. This is not the default -because that would break existing scripts having legacy 8-bit data in -them.) +identifier names, and in your string and regular expression literals, +by saying C<use utf8>. This is not the default because that would +break existing scripts having legacy 8-bit data in them.) =head2 Perl's Unicode Model |