while (do_it($drinks[print_options(\@drinks) -1], \@positions, \@locations)){}