my $Select_All = $listbox_frame->Button(
  -text         =>'Alles auswählen', 
  -command      => sub { $Auswahl_Liste->selectionSet(0, 'end');   } 
);