Tk::Columns 0.03

Tk::Columns is a multicolumn list widget with sortable & sizeable columns.

SYNOPSIS

use Tk::Columns;

$Columns = $parent->B
(
-columnlabels => [qw (column1 column2)]
-listbackground => white,
-listforeground => black,
-buttonforeground => black,
-buttonbackground => blue,
);

$ColumnHeader = $Columns->B
(
-listfont => -adobe-new century schoolbook-medium-r-normal--14-*-*-*-*-*-*-*,
-buttoncolor => beige,
-text => column3,
-width => 15,
-trimcount => 2,
-listbackground => white,
-listforeground => black,
-buttonforeground => black,
-buttonbackground => blue,
-sort => true,
-sortcommand => $a cmp $b,
-image => $icon_image,
-buttoncommand => sub {...},
-selectcommand => sub {...}
);

$Columns->insert (end, [List, Row, Contents]);
$Columns->insert (end, {column1 => List, column2 => Row, column3 => Contents});
$Columns->insert (end, List, Row, Contents);
$Columns->delete (0, end);

...

Tk::MainLoop;