my $CONN = IO::Socket::INET->new("$host:$port")
   or die "Couldn't connect: $!";