p4raw-id: //depot/perl@11234
C<Encode> provides a "layer" (See L<perliol>) which can transform
data as it is read or written.
+ use Encode;
open(my $ilyad,'>:encoding(iso-8859-7)','ilyad.greek');
print $ilyad @epic;
Forces the use of C<perlio> layer even if the platform default, or
C<use open> default is something else (such as ":encoding(iso-8859-7)")
-which would interfere with binary nature of the stream.
+(the C<:encoding> requires C<use Encode>) which would interfere with
+binary nature of the stream.
=back