                    New control messages for controlchan

In the bin/control directory are replacement control scripts in perl.
They will be used if present in your bin/control directory.

controlchan scans bin/control and attempts to load all *.pl files found
there when it starts.

If there is a subroutine named control_xxx, that routine wil be run for
the xxx control message instead of the shell version in bin/control. 
For example, if

   sub control_checkgroups

is found, it will be used instead of the bin/control/checkgroups shell
script.

See the sample scripts for the information the subroutuines are passed. 
They do not return any values to controlchan.  control_xxx subroutines
will be given the following parameters:

   sender         The control message's Sender: (or From: if no sender).
   reply-to       From: (or Reply-To: if present).
   token          The filename or storage manager token of the article.
   site           The path entry that gave us this article.
   action[=log]   The matching action field from control.ctl
   approved       The number of Approved: headers found, 0 if none.

There is a logger() subroutine available in controlchan, output-compatible
with inn's writelog script.  Pass it the article's filename/token, the
logging type (e.g. "newgroup" to use newgroup.log, or "mail" to send mail to
the news account; if there are slashes in the name, it will be taken as the
filename of the log to use) and a text message to appear in the first line
(or mail subject).
