nicht angemeldet
hallo Benne,
Hallo Alain
hmmmmmm,
vielleicht siehst Du jetzt was wesshalb dieser mailer soviel mails sendet,
ich möchte ja nur eine empfangen wenn er was sendet.
if (($ENV{'HTTP_USER_AGENT'} eq "AOL")
was soll das? Das ja wohl garnicht funktionieren. Selbst den armen AOL-Usern ist es freigestellt, welchen Browser sie benutzen. Wenn dann müsstest du eine Abfrage über die IP (*.aol.com) machen.
&& ($count_last > $abusecount && length($username) > 2))
muss das nicht $count_last <= $abusecount heißen ?
{
&SendMail;
}
if ($ip_last ne $ip_now && $ENV{'HTTP_USER_AGENT'} ne "AOL")
{
$count_last++;
}
#if abuse suspected
der Code kommt wohl nicht von dir ;)
if ($count_last > $abusecount && length($username) > 2)
{
&SendMail;
}
else
{
&redir;
was ist das hier. Eventl. könnte die hier durch einen Fehler in der Bedingung rekursiv aufgerufen werden!?
}
sub SendMail {
if (open (MAIL, "|$mailprog -t"))
{
..............etc.
close (MAIL);
&badpass;
} }
sub badpass {
print "<HTML>\n";.................etc.
muss denn noch was geschlossen werden vielleicht mit exit?
nö eigentlich nicht
Gruss vom Alain
Gruß,
Benne