Tk::Menustrip 0.03 review

License: Perl Artistic License File size: 49K Developer: Damion K. Wilson

0

Tk::Menustrip is another menubar with help menu support, etc.

SYNOPSIS

use Tk::Menustrip;
use Tk;

my $MainWindow = MainWindow->new();

my $l_Menubar = $this->Menustrip();

$l_Menubar->MenuLabel ('File'),
$l_Menubar->MenuEntry ('File', 'Save', sub {Save();});
$l_Menubar->MenuSeparator ('File');
$l_Menubar->MenuEntry ('File', 'Exit', sub {Exit();});

$l_Menubar->MenuLabel ('Help', '-right');
$l_Menubar->MenuEntry ('Help', 'About...');
$l_Menubar->MenuSeparator ('Help');
$l_Menubar->MenuEntry ('Help', 'Help On...');

$l_Menubar->pack(-fill => 'x');

Tk::MainLoop;

Requirements:
Perl