Hi,
distro is plain RedHat 5.2 and
majordomo is 1.94.4 from rufus.w3.org as rpm package.
It installed fine but won't run with that dreaded
unknown mailer error 9
Well,
I added some DEBUG info and found the culprit line,
it's majordomo file in while() loop ->
# Process the rest of the message as commands
while (<>) {
$approved = 0; # all requests start as un-approved
$quietnonmember = 0; # show non-member on unsubscribe
while ( /\\\s*$/ ) { # if the last non-whitespace
&chop_nl($_); # character is '\', chop the nl
s/\\\s*$/ /; # replace \ with space char
$_ .= scalar(<>); # append the next line
}
print REPLY ">>>> $_"; # echo the line we are processing
print STDERR "$0: It looks like $_ !.\n" if $DEBUG;
$_ = &chop_nl($_); # strip any trailing newline
print STDERR "$0: It looks like $_ !.\n" if $DEBUG;
s/^\s*#.*//g; # strip comments
print STDERR "$0: It looks like $_ !.\n" if $DEBUG;
s/^\s*//g; # strip leading whitespace
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
it cracks at that line, next line is NEVER executed !?!?
s/\s*$//g; # strip trailing whitespace
s/\\ /\001/g; # protected escaped whitepace
@parts = split(" "); # split into component parts
print STDERR "$0: did I got here twice ???.\n" if $DEBUG;
grep(s/\001/ /, @parts); # replace protected whitespace with
# whitespace
$cmd = shift(@parts); # isolate the command
$cmd =~ tr/A-Z/a-z/; # downcase the command
if ($cmd eq "") { next; } # skip blank lines
# figure out what to do and do it
# the "do_*" routines implement specific Majordomo commands.
# they are all passed the same arguments: @parts.
$count++; # assume it's a valid command, so count it.
if ($cmd eq "end") { print REPLY "END OF COMMANDS\n"; last; }
I just don't know what to do next !?!?
please help
--
Mario Mikocevic (Mozgy)
My favourite FUBAR ...
Follow-Ups:
|
|
