Just to show you another widget, that will allow you to have full control over colors, look at this simple Tk::HList example. It can get as complex as you want, by using the -browsecmd callback to change styles. Search groups.google.com for examples of "perl tk hlist colors" 
#!/usr/bin/perl

use Tk;
use Tk::HList;
require Tk::ItemStyle;

$top = new MainWindow;

$top->ItemStyle(
    'text',
    -stylename => 'red',
#uncomment the following line to see the anchor change
    -anchor => 'e',
    -fg        => 'red',
    -bg        => 'black',
);

$top->ItemStyle(
    'text',
    -stylename => 'blue',
    -fg        => 'blue',
    -bg        => 'lightyellow',
);

$top->ItemStyle(
    'text',
    -stylename => 'cyan',
    -fg        => 'cyan',
);

$top->ItemStyle(
    'text',
    -stylename => 'green',
    -fg        => 'green',
);


$hlist = $top->Scrolled(
    "HList",
    -header           => 1,
    -columns          => 4,
    -scrollbars       => 'osoe',
    -width            => 70,
    -selectbackground => 'SeaGreen3',
)->pack( -expand => 1, -fill => 'both' );


$hlist->header( 'create', 0, -text => 'A',  -style => 'red' );
$hlist->header( 'create', 1, -text => 'B', -style => 'blue' );
$hlist->header( 'create', 2, -text => 'C', -style => 'cyan' );
$hlist->header( 'create', 3, -text => 'D',-style => 'green' );

$hlist->add(0);
$hlist->itemCreate( 0, 0, -text => "abc", -style => 'red' );
$hlist->itemCreate( 0, 1, -text => "def", -style => 'blue' );
$hlist->itemCreate( 0, 2, -text => "ghi", -style => 'cyan' );
$hlist->itemCreate( 0, 3, -text => "jkl", -style => 'green' );

$hlist->add(1);
$hlist->itemCreate( 1, 0, -text => "mnopg", -style => 'red' );
$hlist->itemCreate( 1, 1, -text => "pqr", -style => 'blue' );
$hlist->itemCreate( 1, 2, -text => "stu", -style => 'cyan' );
$hlist->itemCreate( 1, 3, -text => "vwx", -style => 'green' );


$hlist->columnWidth(0, '');
$hlist->columnWidth(1, '');
$hlist->columnWidth(2, '');
$hlist->columnWidth(3, '');

MainLoop();

[download]
I'm not really a human, but I play one on earth Remember How Lucky You Are

In reply to Re: LIst box selection using up and down arrow key by zentara
in thread LIst box selection using up and down arrow key by YGP

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.