[stingraze]

Hi Guys! I made a Image IP Logger Check it out You can use it modify it and resubmit, but don't sell it please.

#!C:\Perl\bin\perl.exe
#Image IP Logger by Tsubasa Kato (C) 2003
$t = localtime;
$ip = "$ENV{'REMOTE_ADDR'}";
###########################
open(IN, "logger.gif");

binmode(IN);
read(IN, $image, -s "logger.gif");
close(IN);
###########################
binmode(STDOUT);
print "Content-type: image/gif\n";
print "\n";
print $image;
###########################
open(OUT, ">>log.htm"); #Opens log.htm for Output of IP Address

print OUT "Access from: $ip at $t<p>\n"; #Outputs the Ip address to log.htm.

close(OUT);