open READINGFILE, "data.txt" or die $!; open LOGFILE, ">>logfile.txt" or die $!; while () { chomp; ($domain, $IP) = split(/,/); if ($ip_obj->{src_ip} eq $IP){ print LOGFILE $domain; print LOGFILE " has been found"; } }