Voltec — Wed, 07 Jul 1999 01:07:00 +0000

Tom,

When an idiot was hunting around my site and posting messages using a double-proxy (to hide his actual IP address) I set up the following:

$ip = $ENV{'REMOTE_ADDR'};
if ( $ip =~ "207.171.193.18" ) {
print "Content-type: text/html\n\n";
print "<METAHTTP-EQUIV=\"Refresh\" Content=\"0;URL=http://www.fbi.gov/\">";
}

Note that I used a Meta refresh because I placed an Include to this 'IP check' at the base of my banner display on each of my pages. You can use a direct Location if you are using it in a stand-alone cgi script. This can be easily modified as mentioned above to span a range of subnets... I didn't have to because the idiot only had fixed holes in systems that he was using. I had to add additonal IP's a couple of times because I would e-mail the system admin of each hole that he used and they started closing them... Needless to say, he stopped bugging us... lol

Matt

----------
1-On-1 Free Basketball Game - Wanna Play?
http://basketball-game.com

Tue, 06 Jul 1999 18:44:00 +0000

almost everything said....
btw, you don't have to scan through all adresses from 0 to 999 since IPs just go up to 255
cu
patrick

Tue, 06 Jul 1999 16:32:00 +0000

As John said ... use this:

if ($userip =~ /100.100.100.[1-999]/) {
&dosomething;
}

Cheers,
Polpus

----------
wdresources
http://www.wdresources.com

John Pollock — Tue, 06 Jul 1999 16:04:00 +0000

I think you can pattern match a range like this:

/[1-999]/

Only trouble is, you may need to split the IP on the dots to get the last number to use it.

There are some more experienced Perl programmers here that should be able to offer more help for you.

----------
Page Resource: http://www.pageresource.com
JavaScript City: http://www.javascriptcity.com