$ip =~ s/\.log$//;
die if $ip =~ /log/;