assume_default_colors(COLOR_RED, 8); # True White bg! Why?
my $win = new Curses;
$win->addstr(0, 0, "Red on White");

##</code><code>##

init_pair(...); 
... 
attron( $win, COLOR_PAIR(...) );