如何在打印之前过滤掉代码点，这些代码点在我的计算机上不可用？

#!/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

回答