X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=blobdiff_plain;f=service;h=d3e0499b96aa81ed4c855118fc3d068319bc8415;hb=26ec3797c5841b90c0ff23997e1e5d392308056e;hp=aefff42ea2e47c720d2aa0373c5091cf23ba8174;hpb=a0d460e9f5b0655ad386ae4580869b377fedbe47;p=d.git diff --git a/service b/service index aefff42..d3e0499 100755 --- 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;