Adapt to new regexp format for MySQL

Author: ericvaandering

DocDB/cgi/DocDBGlobals.pm

@@ -28,6 +28,7 @@
 
 $TRUE  = 1;
 $FALSE = 0;
+$MySQLVersion = 8;
 
 # Advertising link for DocDB
 

DocDB/cgi/SearchAtoms.pm

@@ -113,13 +113,21 @@ sub RegExpSearchAtom {
   }
 
   if ($RequireWord) {
-    $RegExpAtom .= '[[:<:]]';
+    if $MySQLVersion < 8 {
+      $RegExpAtom .= '[[:<:]]';
+    } else {
+      $RegExpAtom .= '\\b';
+    }
   }
   $RegExpAtom .= '(';
   $RegExpAtom .= join '|', @RegExpParts;
   $RegExpAtom .= ')';
   if ($RequireWord) {
-    $RegExpAtom .= '[[:>:]]';
+    if $MySQLVersion < 8 {
+      $RegExpAtom .= '[[:>:]]';
+    } else {
+      $RegExpAtom .= '\\b';
+    }
   }
 
   my $SafeAtom = $dbh->quote($RegExpAtom);