Newsgroups: perl.unicode
Path: csiph.com!feeder.erje.net!1.us.feeder.erje.net!news.ripco.com!news.glorb.com!usenet.stanford.edu!nntp.perl.org
Mailing-List: contact perl-unicode-help@perl.org; run by ezmlm
Date: Thu, 10 Nov 2016 10:33:09 +0100
To: perl-unicode@perl.org
Subject: Re: select a variable as stdout and utf8 flag behaviour
Message-ID: <20161110093308.GA38181@plasmasturm.org>
References: <90839dbc-288d-dff6-af0b-f98c8e62480d@netcologne.de>
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Disposition: inline
Content-Transfer-Encoding: 8bit
In-Reply-To: <90839dbc-288d-dff6-af0b-f98c8e62480d@netcologne.de>
User-Agent: Mutt/1.5.23 (2014-03-12)
Approved: news@nntp.perl.org
From: pagaltzis@gmx.de (Aristotle Pagaltzis)
Xref: csiph.com perl.unicode:233

* Gert Brinkmann <g111@netcologne.de> [2016-11-09 16:00]:
> open(my $fh, '>:encoding(UTF-8)', \$html);
> my $orig_stdout = select( $fh );
> print "Ümläut Test ßaß; 使用下列语言\n";

Think of it this way:

Those three lines of code are an elaborate way of doing this:

    $html = Encode::encode('UTF-8', "Ümläut Test ßaß; 使用下列语言\n");

If you wrote that code, would you be surprised that $html does not
have the UTF8 flag set afterwards?

Bonus question if you are not surprised then: what is the difference
between these two cases that makes your argument that “perl knows what
I put in there so it should know to set the UTF8 flag on it” not apply
to this?

Regards,
-- 
Aristotle Pagaltzis // <http://plasmasturm.org/>