Add SCRAM-SHA-512 to Perl Config Autodetect

config/conf.pl

@@ -1538,6 +1538,18 @@ sub command112a {
             print $WHT . " ERROR DETECTING$NRM\n";
           }
 
+          print "SCRAM-SHA-512:\t";
+          my $tmp = detect_auth_support('IMAP',$host,'SCRAM-SHA-512');
+          if (defined($tmp)) {
+              if ($tmp eq 'YES') {
+                  print "$WHT SUPPORTED$NRM\n";
+              } else {
+                print "$WHT NOT SUPPORTED$NRM\n";
+              }
+          } else {
+            print $WHT . " ERROR DETECTING$NRM\n";
+          }
+
           print "CRAM-MD5:\t";
           my $tmp = detect_auth_support('IMAP',$host,'CRAM-MD5');
           if (defined($tmp)) {
@@ -1705,6 +1717,19 @@ sub command112b {
               } else {
                   print $WHT . "ERROR DETECTING$NRM\n";
             }
+
+            # Try SCRAM-SHA-512
+            print "Testing SCRAM-SHA-512:\t";
+            $tmp=detect_auth_support('SMTP',$host,'SCRAM-SHA-512');
+            if (defined($tmp)) {
+                if ($tmp eq 'YES') {
+                    print $WHT . "SUPPORTED$NRM\n";
+                } else {
+                    print $WHT . "NOT SUPPORTED$NRM\n";
+                }
+              } else {
+                  print $WHT . "ERROR DETECTING$NRM\n";
+            }
         }
     }
     print "\nWhat authentication mechanism do you want to use for SMTP connections?\n";