sub gruppe_loeschen { my $dropdown1 = $main->BrowseEntry()->pack(-side,'top'); #Inhalt Dropdown1 $dropdown1->insert(0,'eins','zwei','drei','vier','fünf'); my $button1 = $main->Button(-text => 'Gruppe löschen', -command => sub { print "hallo"; } )->pack(-side,'bottom'); }