Lines Matching refs:groups
21 # usage: dbmmanage <DBMfile> <command> <user> <password> <groups> <comment>
45 groups or comment of . (or blank) for update command retains old values
46 groups or comment of - for update command clears the existing value
47 groups or comment of - for add and adduser commands is the empty value
144 my($file,$command,$key,$crypted_pwd,$groups,$comment) = @ARGV;
247 $groups = (split /:/, $DB{$key}, 3)[1] if !$groups || $groups eq '.';
262 $groups = '' if $groups eq '-';
264 $groups .= ":" . $comment if $comment;
265 $crypted_pwd .= ":" . $groups if $groups;
308 ($key,$crypted_pwd,$groups,$comment) = split /:/, $_, 4;