如何在打印之前過濾掉代碼點，這些代碼點在我的計算機上不可用？

#!/usr/bin/env perl 
use warnings; 
use 5.012; 
binmode STDOUT, ':encoding(utf-8)'; 

for (0 .. 10000) { 
    print chr, ' '; 
} 
say "";

是否可以在打印之前過濾出此循環中的代碼點，這些代碼點將打印爲空格或矩形。（我試圖複製一些矩形作爲示例，但在瀏覽器中，它們轉換爲不錯的標誌）。如何在打印之前過濾掉代碼點，這些代碼點在我的計算機上不可用？

2011-02-27 sid_com

你能說一下這些打印的地方嗎？就像操作系統一樣，這是否只是輸出到shell等？ – ysth 2011-02-27 22:34:35

Linux終端。 – 2011-02-28 07:05:20

不，你不知道這一點。這是顯示文本的程序中可用的字體的功能。 Perl無法知道該程序的字體替換策略是什麼。

2011-02-27 23:09:42 tchrist

回答