如何在Tcl中打印笑脸

Question

我将纯文本的笑脸图案保存为名为smile.txt的文件

如何在我的工具控制台/终端上打印此文件的内容？

目标是在我的代码成功执行后打印笑脸。而不是写put＆＃34; XXX＆＃34;逐行我认为这样可能更容易。

Answer 1

这是处理基本多语言平面之外的Unicode字符（即大于U + 00FFFF）的已知错误。我们希望将其修复为8.7;它正在积极开展工作。

解决方法

作为一种解决方法，这对我有用，但它可能不适合你：

set t [fconfigure stdout -encoding]
fconfigure stdout -encoding iso8859-1
puts "\xF0\x9F\x98\x89"
fconfigure stdout -encoding $t

这是UTF-8中所需的字节序列，因此暂时将编码转换为ISO 8859-1（编码很特殊，因为它“只是写入字节”，如果你可以生成它们）让你生成你需要的序列