Forum Moderators: phranque

Message Too Old, No Replies

Creating a security .pl

Little help

         

Prohibited

12:21 am on Dec 28, 2004 (gmt 0)

10+ Year Member



Unsure, but I want to create one and I've created it saying:

Hacking Attempt Detected!

All Security Information is Saved. Do not attempt to breech this system again.


IP Address: **.**.***.**
User Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; .NET CLR 1.1.4322) 1.1.4322)

----

How would I create a security.txt and make it write to it telling me WHAT they were trying to do to get the sign.

Also how would I make it so the user would get the message when attempting to hack. Current PL file is:


#!C:/Perl/bin/perl
print "Content-type: text/html\n\n";
print ("

<TITLE>Security Information:</TITLE>

<BODY text=#00ff00 vLink=#000099 aLink=#000099 link=#000099 bgColor=#000000>
<CENTER>
<TABLE cellSpacing=2 cellPadding=2 border=0>
<TBODY>
<TR>
<TD align=middle colSpan=2><FONT face=Arial color=#ff0000
size=+2><B><I>Hacking Attempt Detected!</I></B></FONT><BR></TD></TR>
<TR>
<TD align=middle colSpan=2><FONT face=Arial color=#ff0000 size=-1><B>All
Security Information is Saved. Do not attempt to breech this system
again.</B></FONT><BR><BR></TD></TR>
<TR>
<TD vAlign=top><FONT face=Arial color=#0096ff size=-1><B>IP
Address:</B></FONT></TD>
<TD><FONT face=Arial size=-1><B><I>$ENV{'REMOTE_ADDR'}</I></B></FONT></TD></TR>
<TR>
<TD vAlign=top><FONT face=Arial color=#0096ff size=-1><B>User
Agent:</B></FONT></TD>
<TD><FONT face=Arial size=-1><B><I> $ENV{'HTTP_USER_AGENT'}
1.1.4322)</I></B><BR><BR></FONT></TD></TR></TR></TBODY>


");

Prohibited

8:59 am on Dec 28, 2004 (gmt 0)

10+ Year Member



I've gotten it to write to a text file, but what would I use to tell me what they were doing like "spoofing a user" or something