diff --git a/Webperl/Modules.pm b/Webperl/Modules.pm
index 667e2eb..a9e205f 100644
--- a/Webperl/Modules.pm
+++ b/Webperl/Modules.pm
@@ -138,7 +138,7 @@ sub new_module {
         $mode = "id = ?";
 
     # names are just alphanumerics
-    } elsif($arg =~ /^[a-zA-Z0-9]+$/) {
+    } elsif($arg =~ /^[a-zA-Z0-9.]+$/) {
         $mode = "name LIKE ?";
     }