ncdc 1.25
This commit is contained in:
parent
5acc8eee92
commit
aab7836077
28 changed files with 149 additions and 33 deletions
|
|
@ -9,7 +9,7 @@ my $cgi = CGI::Minimal->new;
|
|||
die if $cgi->truncated;
|
||||
|
||||
my $msg = $cgi->param('message');
|
||||
my $spam = $msg =~ /<a href/;
|
||||
my $spam = $msg =~ /<a href/ || $msg =~ /^katana/;
|
||||
|
||||
if (!$spam) {
|
||||
open my $S, '|-', qw'/usr/sbin/sendmail -t -f dev@yorhel.nl' or die $!;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue