$menu->cascade(-label => 'Untermenue');
    my $um = $menu->Menu(-title => 'Untermenue');
    $menu->entryconfigure('last', -menu => $um);