perl - 如何使用 printf 和 Perl 的 Term::ANSIColor 获得彩色输出？

Question

有没有办法获得 printf 彩色输出？

#!/usr/bin/perl
use warnings; 
use strict;
use Term::ANSIColor;

printf "%4.4s\n", colored( '0123456789', 'magenta' );

输出:(仅换行)

Answer 1

我假设您想要以下内容:

#!/usr/bin/perl
use warnings;
use strict;
use Term::ANSIColor;

print colored( sprintf("%4.4s", '0123456789'), 'magenta' ), "\n";