$client->close() unless (defined($client->peerhost()));
# I am working with IO::Socket::INET Objects.