my @entries = ("Entry #1","Entry #2","Entry #3","Quit"); my $count=0; for (@entries) { $menu->set_choice($count++,$_); }