... | ... |
@@ -131,12 +131,12 @@ sub startup { |
131 | 131 |
user_name => sub { |
132 | 132 |
my $value = shift; |
133 | 133 |
|
134 |
- return ($value || '') =~ /^[a-zA-Z0-9_\-]+$/ |
|
134 |
+ return ($value || '') =~ /^[a-zA-Z0-9_\-]+$/; |
|
135 | 135 |
}, |
136 | 136 |
project_name => sub { |
137 | 137 |
my $value = shift; |
138 | 138 |
|
139 |
- return ($value || '') =~ /^[a-zA-Z0-9_\-]+$/ |
|
139 |
+ return ($value || '') =~ /^[a-zA-Z0-9_\-][a-zA-Z0-9_\-\.]*$/; |
|
140 | 140 |
} |
141 | 141 |
); |
142 | 142 |
|