Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re: please help to exclude my own IP address.

by fokat (Deacon)
on May 02, 2005 at 18:18 UTC ( #453364=note: print w/ replies, xml ) Need Help??

in reply to please help to exclude my own IP address.

NetAddr::IP gives you a convenient way to do what you want.

Say you know your home IP address can be in the range to (or 10.0.0/24, in proper CIDR notation). Your code could then...

use NetAddr::IP; my $home_net = new NetAddr::IP '10.0.0/24'; # ... while (<HANDLE_READING_YOUR_LOG>) { my ($string_ip, $rest) = split(/\s+/, $_, 2); my $ip = new NetAddr::IP $string_ip; next if $home_net->contains($ip); # Happily process $string_ip and $rest as it is not from your home n +et # ... }

Best regards

-lem, but some call me fokat

Comment on Re: please help to exclude my own IP address.
Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://453364]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (2)
As of 2015-10-10 09:50 GMT
Find Nodes?
    Voting Booth?

    Does Humor Belong in Programming?

    Results (255 votes), past polls