Re: PERL_UNICODE environment variable

Jonathan Warden wrote:

> As I understand it, the -CSD commandline option should add UTF8 to the
> PerlIO layers for all file streams.  But it seems only to be applying it to
> STDIN and STDOUT, and not other streams.
> 
> Anyone know what's going on?
> 
>   my $file = new IO::File($filename) or die "Error opening delimited file
> $filename";
>   my @layers = PerlIO::get_layers($file);
>   my @layers2 = PerlIO::get_layers(\*STDOUT);
>   print "Layers: ".Dumper(\@layers,\@layers2);

It seems that IO::File somehow bypasses the effects of -C.  As a
workaround you can use the plain boring open().