my $ip = '127.0.0.1';
print ip_error() unless check_ip($ENV{REMOTE_ADDR},$ip);