# command line parsing, exim version
##preliminary release - may not work at all
#
#if ($#ARGV < 3) {
#    do_log(0,"Missing arguments to exim");
#    do_exit($REGERR, __LINE__);
#}
#
#shift; #ignore "-f"
#$SENDER = shift @ARGV;
#shift; #ignore "-d"
#@RECIPS = @ARGV;

$LDA = $sendmail_wrapper;

push(@LDAARGS, "-oMr");
push(@LDAARGS, "scanned-ok");
push(@LDAARGS, "-i");
push(@LDAARGS, "-f");
push(@LDAARGS, $SENDER);
push(@LDAARGS, @RECIPS);

