В этом нет ничего сложного — правда! Фактически — написать свой почтовик — проще простого. Так же просто как и читать почту через консоль. Далее — две маленькие статьи на живых примерах — как пользоваться POP3 и IMAP без почтового клиента. Читаем POP3 Вам потребуется Linux. Ну или поддержка OpenSSL в Windows — если она […]

#! /usr/bin/perl -w use strict; use Socket; my $port = shift || 82; my $proto = getprotobyname(‘tcp’); socket(SERVER, PF_INET, SOCK_STREAM, $proto) or die «socket: $!»; setsockopt(SERVER, SOL_SOCKET, SO_REUSEADDR, 1) or die «setsock: $!»; my $paddr = sockaddr_in($port, INADDR_ANY); bind(SERVER, $paddr) or die «Failed bind: $!»; listen(SERVER, SOMAXCONN) or die «Failed listen: $!»; print «Daemon started […]