my $red_style  = $hlist -> ItemStyle('text', -background => "red");
$red_style->configure(-background => 'yellow');