list
list-actions
empty string for redirect means reject
+remember to quote comments (to protect # from your shell)
END
our $usage3 = <<'END';
privileged actions
sub nextarg () {
die "too few arguments\n" unless @ARGV;
my $v = shift @ARGV;
- die "option too late on command line\n" if $v =~ m/^-/;
+ die "option in wrong place on command line\n" if $v =~ m/^-/;
return $v;
}
+ (length $worddelim) * ($numwords-1); # delimiters
die "assuming lowest reasonable mean word length $minmaxmeanwordlen".
" addrs would be $expectedmindomlen long but".
- " your maximum length specified $maxdomainlen\n"
+ " maximum length is set to $maxdomainlen (use different -m?)\n"
if $expectedmindomlen > $maxdomainlen;
}