Display a menu if there are multiple options

awit-ssh

@@ -200,12 +200,20 @@ if ($ldapNumResults < 1) {
 	$ldapEntry = $ldapResults[0];
 
 } elsif ($ldapNumResults > 1) {
+	my $counter = 1;
 	logger('WARNING',color('red')."Found multiple entries!".color('reset'));
-	foreach my $key (keys %{$mesg->as_struct()})
-	{
-		logger('WARNING',"  ".color('red')."%s".color('reset'),$key);
+	print STDERR "\n";
+	foreach my $key (sort(keys %{$mesg->as_struct()})) {
+		logger('MENU '.$counter,"  ".color('red')."%s".color('reset'),$key);
+		$counter++;
+	}
+	print STDERR "Your selection: ";
+	chomp(my $menuSelection = <STDIN>);
+	if ($menuSelection =~ /\D/) {
+		exit 3;
 	}
-	exit 3;
+	$menuSelection--;
+	$ldapEntry = $ldapResults[$menuSelection];
 }
 
 print STDERR "\n";