#command line parsing, exim version
#preliminary realease - 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);

