bbs_forum.cgi

$forum = $in{"forum"};

if ($forum = "Recruiter Forum") {
$list = "forum";
}
elsif ($forum = "Recruiter Jobs") {
$list = "jobs";
}
elsif ($forum = "Recruiter Resumes") {
$list = "resumes";
}


$database = "/path/to/mailing_list/Lists/$list.list.cgi";


mail-lib.pl

replaced

print MAIL qq!To: $touser
From: $fromuser
Subject: $subject
$messagebody
!;

with

print MAIL "To: $touser\n";
print MAIL "Subject: $forum Posting\n";
print MAIL "The following message has been posted to the $forum at
http://www.recruiterbbs.com\n\n";
print MAIL "$messagebody";



mailing list
default.setup.cgi

<TR>
<TH>Mailing Lists</TH>
<TD><SELECT NAME = "lists" MULTIPLE>
<OPTION VALUE = "forum" SELECTED>Recruiter Forum
<OPTION VALUE = "jobs">Recruiter Job Postings
<OPTION VALUE = "resumes">Recruiter Resumes
<OPTION VALUE = "all">All Lists
</SELECT></TD>
</TR>