sub add_members {
	foreach (@addmembers)
	{
		my $sql = "INSERT INTO cmt_members (CmtID, MemberID)";
		$sql .= "VALUES ($requestID, $_)";
		my $sth = $dbh->prepare($sql) ||
		die "Error preparing: $DBI::errstr";
		$sth->execute ||
		die "Error executing: $DBI::errstr";
	}
}

sub remove_members {
	print p("we're in the remove members function");
	foreach (@currmembers)
	{
		print p($_);
		my $sql = "DELETE FROM cmt_members WHERE MemberID = $_ and CmtID = $requestID";
		print p($sql);
		$sth = $dbh->prepare($sql) ||
			die "Error preparing: $DBI::errstr";
		$sth->execute ||
			die "Error executing: $DBI::errstr";
		$requestID = $requestID;
	}
}