my $ip = $ENV{'REMOTE_ADDR'};
open(ABSENDER,"hosts") or die $!;