I posted a feature request about a better referer check a few weeks ago.
Since noone answered it, I implemented this by myself.
My implementation (not yet completely finished) has a few other
features, eg. IP range for referer, ...
In order to code all this, I split the formmail code up into several
Perl Classes. The resulting script is now completely OO-Perl. It is thus
easier to make changes and to add new features. The configuration is
much more scalable for different purposes. A module that reads the
config from a file rather than from the form input fields (like TFMail)
could quickly be added.
It does not use more external modules than nms-FormMail and runs under
-wT as well. It runs as CGI and mod_perl. The biggest drawback is it
consists of approximately 10 class files instead of one large file. But
this should not be a big problem.
If you are interested, I make it freely available as a nms-script (eg.
formmail-oo).
Thomas
(sourceforge user id: lochmatter)
|
