diff options
-rwxr-xr-x | sanitycheck.cgi | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/sanitycheck.cgi b/sanitycheck.cgi index 1d9a994b5..8060c1c99 100755 --- a/sanitycheck.cgi +++ b/sanitycheck.cgi @@ -418,13 +418,12 @@ DoubleCrossCheck("milestones", "product_id", "value", Status("Checking profile logins"); my $emailregexp = Param("emailregexp"); -$emailregexp =~ s/'/\\'/g; -SendSQL("SELECT userid, login_name FROM profiles " . - "WHERE login_name NOT REGEXP '" . $emailregexp . "'"); - +SendSQL("SELECT userid, login_name FROM profiles"); while (my ($id,$email) = (FetchSQLData())) { - Alert "Bad profile email address, id=$id, <$email>." + unless ($email =~ m/$emailregexp/) { + Alert "Bad profile email address, id=$id, <$email>." + } } ########################################################################### |