genopts alphanum tidyups, more

diff --git a/service b/service
index aefff42ea2e47c720d2aa0373c5091cf23ba8174..d3e0499b96aa81ed4c855118fc3d068319bc8415 100755 (executable)
--- a/service
+++ b/service
@@ -39,9 +39,7 @@ use strict;
 use DBI;
 use POSIX;
 
-our $minrandlength = 6;
 our $randlength;
-our $maxrandlength = 50;
 
 our $maxperuser = 10000;
 our $qualdom;
@@ -52,6 +50,10 @@ our $priv;
 our $showcomment;
 our $genmethod = 'alphanum';
 
+# for alphanum
+our $minrandlength = 6;
+our $maxrandlength = 50;
+
 sub nextarg () {
     die "too few arguments\n" unless @ARGV;
     my $v = shift @ARGV;