Perl / Tk

1.) Menü (Menubar) erstellen:
my $menu = $mw->Menu(-type => 'menubar');

2.) Dem Fensterwidget dieses Menü zuweisen:
$mw->configure(-menu => $menu);

3.) Eigentliche Menüs in der Menubar eintragen:
    $menu->cascade(-label     => 'Datei',
                   -underline => 0,              );
    $menu->cascade(-label     => 'Bearbeiten',
                   -underline => 0,              );
    $menu->separator();
    $menu->cascade(-label     => 'Hilfe',
                   -underline => 0,              );