$expensemb->command(-label => $item, -command => sub { $chosen_item = $item });