fielding    96/12/01 06:54:42

  Modified:    support   dbmmanage.new
  Log:
  Expand on the "Too few arguments" message you get when invoking dbmmanage
  with less than two args.
  
  Submitted by: Skip Montanaro ([EMAIL PROTECTED])
  Reviewed by: Rob Hartill, Randy Terbush, Chuck Murcko, Ben Laurie
  
  Revision  Changes    Path
  1.4       +9 -2      apache/support/dbmmanage.new
  
  Index: dbmmanage.new
  ===================================================================
  RCS file: /export/home/cvs/apache/support/dbmmanage.new,v
  retrieving revision 1.3
  retrieving revision 1.4
  diff -C3 -r1.3 -r1.4
  *** dbmmanage.new     1996/08/20 13:25:03     1.3
  --- dbmmanage.new     1996/12/01 14:54:42     1.4
  ***************
  *** 1,5 ****
    #!/usr/local/bin/perl
  ! # $Id: dbmmanage.new,v 1.3 1996/08/20 13:25:03 paul Exp $
    
    # ====================================================================
    # Copyright (c) 1995 The Apache Group.  All rights reserved.
  --- 1,5 ----
    #!/usr/local/bin/perl
  ! # $Id: dbmmanage.new,v 1.4 1996/12/01 14:54:42 fielding Exp $
    
    # ====================================================================
    # Copyright (c) 1995 The Apache Group.  All rights reserved.
  ***************
  *** 61,67 ****
    # adduser encrypts the password:
    # dbmmanage <dbm file> adduser <person> <password>
    
  ! die "Too few arguments.\n" if (@ARGV < 2);
    
    ($file,$command,$key,$value) = @ARGV;
    
  --- 61,74 ----
    # adduser encrypts the password:
    # dbmmanage <dbm file> adduser <person> <password>
    
  ! if (@ARGV < 2) {
  !     die "Too few arguments.\
  !    Usage: dbmmanage <DBMfile> <command> [<key> [<value>]]\
  !    where command is add, delete, view or adduser.\
  !    No value required for \"delete\", no key or value for \"view\".\
  !    To change a value, simply use \"add\".\
  !    \"adduser\" encrypts the value and uses it as the user's password\n";
  ! }
    
    ($file,$command,$key,$value) = @ARGV;
    
  
  
  

Reply via email to