|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Paul Levashev 2:5000/104.83 25 Sep 2002 13:27:02
To : All
Subject : Почему не работает?
--------------------------------------------------------------------------------
Использую Active Perl 522 под вин98
=== ачало SOCKET.PL ===
use Socket;
$proto = getprotobyname('tcp');
socket(Socket_Handle, PF_INET, SOCK_STREAM, $proto);
$port = getservbyname('echo', 'tcp');
$sin = sockaddr_in($port,inet_aton("127.1"));
connect(Socket_Handle,$sin)
or die " $!\n"; ####Вот здесь пишет Unknown Error
=== Конец SOCKET.PL ===
Может ли это вообще работать под виндами?
Кто сталкивался с этим - помогите.
Bye, Paul
ъъъ [Guitara] ъъъ [Vodyara] ъ&ъ [Tara] ъъъ Mailto: levashev_p@mail.ru
--- GoldED/386 3.00.Beta5+
* Origin: ... (2:5000/104.83)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
