我写了一个 Perl 程序来着色它的输出。
不幸的是,我还有一个解释器,它运行我的程序并在不了解任何 ANSI 转义序列的情况下显示其输出。
简单地绕过 Term::ANSIColor
的正确方法是什么?对于每个 say
或 print
语句(即 say ($ENV{'TERM'} ne 'NONE')?colored('foo', green):'foo';
)总是处理这两种情况会很糟糕
欢迎任何建议。
最佳答案
使用 ANSI_COLORS_DISABLED
环境变量:
关于perl - Term::ANSIColor 当术语不支持颜色时,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/27964065/