my @ip
while (<LOG>) { #assuming you are looping through a log file
my $log = $_; #making this blatent 
push(@ip, $log) if $log =~ /^192\.168\.1\.10/;

##</code><code>##

push(@ip, $log) if 0 == index($log,'192.168.1.10');