Fix up a perl regex that was preventing emulab-ops from being

recognized cause of the dash in the name.

db/Project.pm.in

@@ -63,7 +63,7 @@ sub Lookup($$)
 	$query_result =
 	    DBQueryWarn("select * from projects where pid_idx='$token'");
     }
-    elsif ($token =~ /^\w*$/) {
+    elsif ($token =~ /^[-\w]*$/) {
 	$query_result =
 	    DBQueryWarn("select * from projects where pid='$token'");
     }