develooper Front page | perl.perl5.porters | Postings from September 2012

[perl #114094] use open pragma overrides std

From:
arnon@back2front.ca via RT
Date:
September 11, 2012 22:34
Subject:
[perl #114094] use open pragma overrides std
Message ID:
rt-3.6.HEAD-11172-1347423631-1161.114094-14-0@perl.org
On Wed Jul 11 15:27:19 2012, thewebsi wrote:
> generated with the help of perlbug 1.36 running under perl 5.10.0.

This appears to be a duplicate of
https://rt.perl.org/rt3/Public/Bug/Display.html?id=92728, which is
marked Resolved in 5.12.3, but I'm getting the same bad results under
perl 5.14.2:

#!/usr/bin/perl

use open ( ":encoding(UTF-8)", ":std" );
use open ( ":encoding(UTF-8)" );

print "DEBUG: STDOUT=" . join ( ",", PerlIO::get_layers ( STDOUT ) ) . "\n";

Result:
DEBUG: STDOUT=unix,perlio




nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About