perl字体颜色

发布时间：2020-12-16 00:09:02 所属栏目：大数据来源：网络整理

导读：在perl中是借助Term::ANSIColor这个模块的： #!/usr/bin/perl use strict; use Term::ANSIColor; print color 'bold red'; print "Hello wordn"; print color 'reset'; ? 这样写的话挺麻烦的，写个函数算了： #!/usr/bin/perl use strict; use Term::ANSICo

在perl中是借助Term::ANSIColor这个模块的：

#!/usr/bin/perl
use strict;
use Term::ANSIColor;
print color 'bold red';
print "Hello wordn";
print color 'reset';

这样写的话挺麻烦的，写个函数算了：

#!/usr/bin/perl
use strict;
use Term::ANSIColor;
sub ColorMessage{
my($colors,$messages) = @_;
print color "bold $colors";
print "$messages n";
print color 'reset';
}

ColorMessage('green','Hello word ');

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!