/[docman]/adduser.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /adduser.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4 by dpavlin, Thu Sep 6 09:32:55 2001 UTC revision 1.5 by dpavlin, Thu Sep 6 10:48:20 2001 UTC
# Line 6  use Digest::MD5 qw(md5_hex); Line 6  use Digest::MD5 qw(md5_hex);
6    
7  my $htpasswd = shift @ARGV || ".htusers";  my $htpasswd = shift @ARGV || ".htusers";
8    
9  if ($htpasswd eq "-h") {  if (defined $htpasswd && $htpasswd eq "-h") {
10          print "Usage: $0 [htusers file] [login] [full name] [password] [email]\n";          print "Usage: $0 [htusers file] [login] [full name] [password] [email]\n";
11          exit;          exit;
12  }  }
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.26