perl - 诅咒：向 addstr 函数添加属性的正确方法是什么？

Question

这有效：

#!/usr/bin/env perl
use warnings;
use 5.012;
use Curses;

initscr();

addstr( 5, 5, 'Hello, World!' );

refresh();
sleep 2;
endwin();

但是如果我向“addstr”函数添加一个属性，它就不再起作用了：

addstr( 5, 5, 'Hello, World!', A_BOLD );

我需要改变什么，才能得到一个大胆的“Hello World”？

Answer 1

addstr()不接受属性。使用attron()/attroff()代替：

attron(A_BOLD);
addstr(5, 5, 'Hello, world!');
attroff(A_BOLD);