IP address matching

[sammy100]

i have a file that contains a list of IP addresses like:

20.45.76.196
15.76.96.156
21.34.56.146
...etc

how do i compare each entry in this file to check if it matches with the input that the user has given. the input given exists in the variable $in{IP}
does anyone know how to do this? please help. thx a lot.

Regards
Samantha

 

[sucram]

Try this:


open(FILEHANDLE, "/path/to/your/file"

while ( $input = chomp <FILEHANDLE> )
{
if($in{IP} eq $input)
{
print(&quot;$in{IP} equals $input \n&quot;
}
}


close(FILEHANDLE);


I hope it works,
Marcus