die "Can't write to server!\n" unless $server->can_write
syswrite($sock, "$data\n" );