#! /usr/bin/perl
use CGI;
$q = new CGI;
$ip = $q->remote_host;
if ( $ip eq 'w.x.y.z')
{ ##### code
} else
{ ##### code
}
--
Djoko Priyono
System Programmer
PT Dyviacom Intrabumi Tbk.
Jakarta - Indonesia
On Wednesday 21 November 2001 08:02 pm, Rahul Garg wrote:
> Hi everybody,
>
> The problem goes like this :
>
> from html i am calling a perl script.
> in that perl script what i want is :
>
> if (the request is comping from ip adress==w.x.y.z)
> {
> #####code
> }
> else
> {
> #####code
> }
> what should i do to know from which ip address the request is coming in
> perl... any suggestions......refrences..sample perl script for this will
> be of immense help.
>
> Thanks
> Rahul
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
