Changeset 70
- Timestamp:
- 11/21/08 17:49:55 (3 years ago)
- File:
-
- 1 edited
-
devel/sshgw/bin/createsshuser (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
devel/sshgw/bin/createsshuser
r11 r70 58 58 # print "TEST: ccmail1: $emailcc\n"; 59 59 } 60 print STDERR "Unknown option $params[0]\n"; 61 &usage; 60 62 } 61 63 … … 85 87 die "User $username already exists\n" if getpwnam($username) ; 86 88 87 die "Full name should not contain any special characters (like : or \")\n" unless $fullname =~ /^[a-z àâäéèêëîïôöùûüÿA-Z0-9 (),\.\-_\$&\#]+/ ;89 die "Full name should not contain any special characters (like : or \")\n" unless $fullname =~ /^[a-zà âÀéÚêëîïÎöùûÌÿA-Z0-9 (),\.\-_\$&\#]+/ ; 88 90 89 91 foreach $group (split(/ /,$groups)) {
Note: See TracChangeset
for help on using the changeset viewer.
