p4raw-id: //depot/perl@17272
=head1 SYNOPSIS
- open($fh,">:crlf", "my.txt")
- open($fh,">:bytes","his.jpg")
+ open($fh,">:crlf", "my.txt"); # portably open a text file for writing
+
+ open($fh,"<","his.jpg"); # portably open a binary file for reading
+ binmode($fh);
Shell:
PERLIO=perlio perl ....