我写了一个 Perl 程序来着色它的输出。

不幸的是,我还有一个解释器,它运行我的程序并在不了解任何 ANSI 转义序列的情况下显示其输出。

简单地绕过 Term::ANSIColor 的正确方法是什么?对于每个 sayprint 语句(即 say ($ENV{'TERM'} ne 'NONE')?colored('foo', green):'foo';)总是处理这两种情况会很糟糕

欢迎任何建议。

最佳答案

使用 ANSI_COLORS_DISABLED 环境变量:

关于perl - Term::ANSIColor 当术语不支持颜色时,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/27964065/

10-15 09:23