Can someone help me with a problem I have.

I use a default mailform script wich my customers can use.
Recently I noticed that someone have used it to spam. That maks me
angry.

I now have to try to find out who that is and prevent futher spamuse of
my form.

I good ide how to prevent pepole to obuse my form and at the same time
keep it avalible.

To detect who are using it I have the following thought.

in the mailform

require log.pl

and in the log.pl

#!/usr/bin/perl -wT

$location = "unknown";
if ($ENV{'REMOTE_ADDR'}) {
      $location = $ENV{REMOTE_ADDR};
}
if ($ENV{REMOTE_HOST}) {
     $location = $ENV{REMOTE_HOST};
}

$path = "/path/to/logfile";
open (FH, ">> $path");
print FH "------------\n";
print FH $location;
print FH "\n------------\n";
close FH;

the only problem is that only the fist time I use the mailform there is
acctualy
something written in the logfile and it only says unknown.

Can someone help me out here?


***************************
Raven
System Administrator
Euro Business Link
www.ebl.se


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to