my $get_mlistbox_choice_index = sub { ... }

...->activate($get_mlistbox_choice_index->(...));