为什么Windows上的ActivePerl程序停止接受套接字连接？

发布时间：2020-12-14 02:53:19 所属栏目：Windows 来源：网络整理

导读：我在 Windows(ActivePerl)上的Perl上使用fork()作为基本套接字服务器,但显然存在问题(几次后它不会接受连接),有没有解决办法？以下是相关代码的一部分： while($client = $bind-accept()) { $client-autoflush(); if(fork()){ $client-close(); } else { $b

我在 Windows(ActivePerl)上的Perl上使用fork()作为基本套接字服务器,但显然存在问题(几次后它不会接受连接),有没有解决办法？

以下是相关代码的一部分：

while($client = $bind->accept()) {
    $client->autoflush();
    if(fork()){ $client->close(); }
    else { $bind->close(); new_client($client); exit(); }
}

解决方法

我建议安装 Net::Server并使用它,因为你可能没有令人信服的理由让你自己编写所有的监听和分支逻辑,而Net :: Server已经过很好的测试,可以在包括ActivePerl在内的许多平台上运行. Net::Server::Fork的个性与您正在编写的代码最相似,尽管我建议使用 Net::Server::Prefork,因为它以最低的成本提供更好的性能.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!