3
當我運行該腳本,我得到8行輸出,而不是2意外行爲PerlIO的:編碼
#!perl
use strict;
use warnings;
use 5.10.1;
use PerlIO::encoding;
use Encode qw(:fallbacks);
$PerlIO::encoding::fallback = Encode::FB_HTMLCREF;
binmode STDOUT, ":encoding(cp850)";
say "TEST";
say "Hell\x{263a}\x{263b}llo.txt";
輸出:
# TEST
# TEST
# Hell☺☻llo.txt
# TEST
# Hell☺☻llo.txt
# TEST
# Hell☺☻llo.txt
#
爲什麼這個腳本輸出這麼多線?
對我來說看起來像一個bug。在perl 5.18.2上確認了 – cjm
,同樣的情況也發生在'utf8'等其他編碼上。這似乎是一個'FB_HTMLCREF'的東西。 – amon