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

Say you know your home IP address can be in the range 10.0.0.0 to 10.0.0.255 (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
  # ...
}
[download]