diff --git a/doc/gcc-performance.html b/doc/gcc-performance.html
index dc0adb53..6f22ddb8 100644
--- a/doc/gcc-performance.html
+++ b/doc/gcc-performance.html
@@ -400,7 +400,7 @@
          </tr>
          <tr>
             <td><code> ^([a-zA-Z0-9_\-\.]+)@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.)|(([a-zA-Z0-9\-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)$</code></td>
-            <td>john_maddock@compuserve.com</td>
+            <td>john@johnmaddock.co.uk</td>
             <td>1.22<br>
                (1.51e-06s)</td>
             <td>1.23<br>
diff --git a/doc/vc71-performance.html b/doc/vc71-performance.html
index 5bae1d7f..eca7a248 100644
--- a/doc/vc71-performance.html
+++ b/doc/vc71-performance.html
@@ -517,7 +517,7 @@
             </tr>
             <tr>
                <td><code>^([a-zA-Z0-9_\-\.]+)@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.)|(([a-zA-Z0-9\-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)$</code></td>
-               <td>john_maddock@compuserve.com</td>
+               <td>john@johnmaddock.co.uk</td>
                <td><font color="#008000">1<BR>
                      (1.18e-006s)</font></td>
                <td>1.42<BR>
diff --git a/performance/main.cpp b/performance/main.cpp
index 5af4653b..33280a9a 100644
--- a/performance/main.cpp
+++ b/performance/main.cpp
@@ -145,7 +145,7 @@ int cpp_main(int argc, char * argv[])
       test_match("^([0-9]+)(\\-| |$)(.*)$", "100- this is a line of ftp response which contains a message string");
       test_match("([[:digit:]]{4}[- ]){3}[[:digit:]]{3,4}", "1234-5678-1234-456");
       // these are from http://www.regxlib.com/
-      test_match("^([a-zA-Z0-9_\\-\\.]+)@((\\[[0-9]{1,3}\\.[0-9]{1,3}\\.[0-9]{1,3}\\.)|(([a-zA-Z0-9\\-]+\\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\\]?)$", "john_maddock@compuserve.com");
+      test_match("^([a-zA-Z0-9_\\-\\.]+)@((\\[[0-9]{1,3}\\.[0-9]{1,3}\\.[0-9]{1,3}\\.)|(([a-zA-Z0-9\\-]+\\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\\]?)$", "john@johnmaddock.co.uk");
       test_match("^([a-zA-Z0-9_\\-\\.]+)@((\\[[0-9]{1,3}\\.[0-9]{1,3}\\.[0-9]{1,3}\\.)|(([a-zA-Z0-9\\-]+\\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\\]?)$", "foo12@foo.edu");
       test_match("^([a-zA-Z0-9_\\-\\.]+)@((\\[[0-9]{1,3}\\.[0-9]{1,3}\\.[0-9]{1,3}\\.)|(([a-zA-Z0-9\\-]+\\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\\]?)$", "bob.smith@foo.tv");
       test_match("^[a-zA-Z]{1,2}[0-9][0-9A-Za-z]{0,1} {0,1}[0-9][A-Za-z]{2}$", "EH10 2QQ");