Some things simply cannot be prevented on a public forum ... If you do not like what is being posted.. dont read it ...
Once a person takes the variety of online personallities serious.. it's time to give the computer a break for awhile ...
Remember.. there is no such thing as a perfect message board or perfect members ...
$socket = IO::Socket::INET->new(Proto => "udp") or die "Socket error: $@\n";
$ipaddr = inet_aton($host);
$portaddr = sockaddr_in($port, $ipaddr);
send($socket, $buf, 0, $portaddr) == length($buf) or die "Can't send: $!\n";
print "Now, '$host' must be dead : )\n";