diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-11-02 15:19:35 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-11-02 15:19:35 +0000 |
commit | 3de8ed06f96286478ecf8f3810596152fa21b27b (patch) | |
tree | a4869ab5d3cd7affdcf1aa319fc107a621e8a4fb /lib/encoding.pm | |
parent | 8be1be9027535daad1bce57b01a65406b28b3a19 (diff) | |
download | perl-3de8ed06f96286478ecf8f3810596152fa21b27b.tar.gz |
More encoding testing.
p4raw-id: //depot/perl@12813
Diffstat (limited to 'lib/encoding.pm')
-rw-r--r-- | lib/encoding.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/encoding.pm b/lib/encoding.pm index 2f4b059839..6f5970f2ca 100644 --- a/lib/encoding.pm +++ b/lib/encoding.pm @@ -43,7 +43,7 @@ encoding - pragma to control the conversion of legacy data into Unicode print "tera\n" if ord(pack("C", 0xdf)) == 0x3af; - # but pack/unpack C are not, in case you still + # but pack/unpack are not affected, in case you still # want back to your native encoding print "peta\n" if unpack("C", (pack("C", 0xdf))) == 0xdf; @@ -58,13 +58,13 @@ The pragma is a per script, not a per block lexical. Only the last C<use encoding> matters, and it affects B<the whole script>. If no encoding is specified, the environment variable L<PERL_ENCODING> -is consulted. If that fails, "latin1" (ISO 8859-1) is assumed. -If no encoding can be found, C<Unknown encoding '...'> error will be thrown. +is consulted. If that fails, "latin1" (ISO 8859-1) is assumed. If no +encoding can be found, C<Unknown encoding '...'> error will be thrown. =head1 KNOWN PROBLEMS -The C<\x..> and C<\0...> in regular expressions are not affected by -this pragma. They very probably should. +Literals in regular expressions are not affected by this pragma. +They very probably should. =head1 SEE ALSO |