X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FPerlIO.pm;h=116deb5f35cd816081fd0b96018980e840989352;hb=8f01dc65ffe0fac5309bf561048e6ae93442a218;hp=3b277d93761d1b01654837af672a660c49b5372f;hpb=3d897973af512747f1e151f6cf3b7bc2230d4067;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/PerlIO.pm b/lib/PerlIO.pm
index 3b277d9..116deb5 100644
--- a/lib/PerlIO.pm
+++ b/lib/PerlIO.pm
@@ -1,6 +1,6 @@
 package PerlIO;
 
-our $VERSION = '1.02';
+our $VERSION = '1.04';
 
 # Map layer name to package that defines it
 our %alias;
@@ -35,7 +35,7 @@ PerlIO - On demand loader for PerlIO layers and root of PerlIO::* name space
 
 =head1 SYNOPSIS
 
-  open($fh,"<:crlf", "my.txt"); # portably open a text file for reading
+  open($fh,"<:crlf", "my.txt"); # support platform-native and CRLF text files
 
   open($fh,"<","his.jpg");      # portably open a binary file for reading
   binmode($fh);
@@ -188,7 +188,7 @@ An example of a possible use might be:
     ...
     binmode($fh,":encoding(...)");  # next chunk is encoded
     ...
-    binmode($fh,":pop");            # back to un-encocded
+    binmode($fh,":pop");            # back to un-encoded
 
 A more elegant (and safer) interface is needed.
 
@@ -288,7 +288,7 @@ The following table summarizes the default layers on UNIX-like and
 DOS-like platforms and depending on the setting of the C<$ENV{PERLIO}>:
 
  PERLIO     UNIX-like                   DOS-like
- 
+ ------     ---------                   --------
  unset / "" unix perlio / stdio [1]     unix crlf
  stdio      unix perlio / stdio [1]     stdio
  perlio     unix perlio                 unix perlio
@@ -317,7 +317,7 @@ B<Implementation details follow, please close your eyes.>
 The arguments to layers are by default returned in parenthesis after
 the name of the layer, and certain layers (like C<utf8>) are not real
 layers but instead flags on real layers: to get all of these returned
-separately use the optional C<separate> argument:
+separately use the optional C<details> argument:
 
    my @layer_and_args_and_flags = PerlIO::get_layers($fh, details => 1);
 
@@ -338,4 +338,3 @@ L<perlfunc/"binmode">, L<perlfunc/"open">, L<perlunicode>, L<perliol>,
 L<Encode>
 
 =cut
-