Socket Hellow word

1. Сокет - это для связи файлов.
2. Обязательно один файл слушает, а другой отправляет.
3. Самое простое - это сервер. Обычный сервер. Например: http://chajnik.ru
Он слушает 80-й порт
Что такое порт? - это циферки в конце адреса страницы. Например: http://chajnik.ru:80
4. Теперь нам осталось написать клиента. Напишем его на perl. Как на самом крутом языке в мире:

#!/usr/bin/perl

use Socket;

$host="chajnik.ru";
$port="80";

socket(SOCK, PF_INET, SOCK_STREAM, getprotobyname('tcp'));

$iaddr = inet_aton($host);
$paddr = sockaddr_in($port, $iaddr);

connect(SOCK, $paddr);
#send (SOCK, "GET / HTTP/1.0\n\n", 0);
send (SOCK, "GET / HTTP/1.0\nHOST:$host\n\n", 0);

@data=<SOCK>;

close(SOCK);

print @data;

5. Посмотреть? Тоже пожалуйста:
http://lar.russkiyslovar.ru/cgi-bin/u.pl

6. При перепечатке ссылка на источник: https://chajnik.ru/socket обязательна