Я верю что пхп говно
let sock = new TcpClient()
sock.Connect ("127.0.0.1", 12345)
let sender = new
BinaryWrite ( sock.GetStream())
sender.WriteCUTF8 Encoding.UTF8
GetBytes ("я текст"))
F# ↑
Php↓
<center>
<form method="post">
<input type="text" name="ip" size="35">
<input type="submit" value="Введите IP-адрес" value="<?= htmlspecialchars($_REQUEST['ip']); ?>">
</form>
</center>
<?php
if(!empty($_POST['ip'])) echo whois("whois.arin.net",$_POST['ip']);
function whois($url,$ip)
{
// Соединение с сокетом TCP, ожидающим на сервере "whois.arin.net" по
$sock = fsockopen($url, 43, $errno, $errstr);
if (!$sock) exit("$errno($errstr)");
else
{
echo $url."
";
$_POST["ip"] в дескриптор сокета.
fputs ($sock, $ip."\r\n");
$text = "";
while (!feof($sock))
{
$text .= fgets ($sock, 128)."
";
}
// закрываем соединение
fclose ($sock);
$pattern = "|ReferralServer: whois://([^\n<:]+)|i";
preg_match($pattern, $text, $out);
if(!empty($out[1])) return whois($out[1], $ip);
else return $text;
}
}