问题标签 [io-socket]

/我得到了贝娄回应\

可以向我的 nodejs 服务器发出的一些请求需要大量处理（例如：5000 个文件）。由于请求需要一段时间来处理，我想在浏览器中显示进度。为此，我正在使用 io-socket。服务器定期将进度提前发送给客户端，例如ioSocket.emit("log", "progress 24%).
但是，如果向客户端发送进度通常可以工作，那么当有大量文件时，它就不行了。没有任何东西发送到浏览器。
我确定该过程进展顺利，因为我将进度记录到节点终端，并且它按预期显示。

我想知道如何让 ioSocket.emit 事件在重负载情况下工作，因为这是查看进度最有用的地方。

文件处理函数如下所示：

在这个例子中，只有第一个“开始”发射将被触发到浏览器。

但是，如果我执行以下操作：

一切正常，我将“开始”和所有“每个进度”发送到浏览器。

我有以下代码（较大脚本的一部分）

我得到了错误Can't call method "sockport" on an undefined value。

的文档IO::Socket::INET在这个问题上没有说太多：https ://perldoc.perl.org/IO/Socket/INET.html （有更好的地方看吗？对这个模块不太熟悉）。

奇怪的是，我最近更改了这个，在它传入一个非零、随机生成的端口号之前，当端口正在使用时，有时会中断。

我在本地 Windows 机器上测试了传入0（同样，文档似乎没有提到如何让它选择要绑定的端口），这似乎使它“选择任何可用端口”，这就是我想要的，但它在 Solaris 上的行为可能有所不同（这是发生此问题的地方）？

所以，有时当我重新启动我的服务器时，它会修复它，有时它不会，但我不断得到Error: listen EADDRINUSE :::5000. 在我package.json的客户端中，我有一个代理"proxy": "http://localhost:5000"，我将其更改为端口 3000 以对其进行测试，但问题仍然存在。我进入server.js并尝试仅更改端口，但我将其更改为的任何端口都表示它正在使用中。所以，我假设我如何设置快递肯定是个问题。我只是不知道要改变什么，因为它是间歇性的。

而且很奇怪我的服务器仍在运行，因为我的套接字工作......

编辑这是我的脚本：

server.js 片段

有一个发送一些 json 数据的 api。nodejs 服务器获取这个 json 数据并每 5 秒用 websocket 发送客户端。如果连接在 clent 连接时它工作但当客户端断开连接时，它不会停止。

编码

或者

除了 websocket 之外，您还有什么其他建议可以将此 json 数据发送到客户端吗？

提前感谢您的支持

我知道它应该获取文本并将其发送到每个套接字，但我不确定每一行的作用。

我正在使用 IO::Socket::Async 在 P6 中重写我的 P5 套接字服务器，但是接收到的数据在最后被截断了 1 个字符，并且在下一个连接时接收到了 1 个字符。来自 Perl6 Facebook 小组 (Jonathan Worthington) 的人指出，这可能是由于字符串的性质和字节在 P6 中的处理方式非常不同。引：

在 Perl 6 中，字符串和字节的处理方式非常不同。值得注意的是，字符串在字素级别工作。接收 Unicode 数据时，不仅有可能将多字节序列拆分为数据包，还可能将多码点序列拆分。例如，一个数据包的末尾可能有字母“a”，而下一个数据包可能是一个组合的重音符号。因此，在看到下一个数据包如何开始之前，它不能安全地传递“a”。

我的 P6 在 MoarVM 上运行

https://pastebin.com/Vr8wqyVu

结果

我有一个使用 IO::Socket::Async 和 Redis::Async 进行消息发布的套接字服务器。每当服务器接收到消息时，脚本将翻译该消息并生成确认消息以发送回发送者，以便发送者发送后续消息。由于翻译消息非常昂贵，脚本将在“开始”方法下运行该部分。但是，我注意到 Moar 进程在脚本运行时占用了我的 RAM。有没有想过我应该在哪里解决这个问题？谢谢！

https://pastebin.com/ySsQsMFH

我正在用 Perl 编写一个非常简单的绑定 shell，它应该在 Windows 上打开一个特定端口，当我用 ncat 连接到它时，我应该能够从 ncat 编写命令，这些命令在机器上执行并返回给我 STDOUT . 到目前为止，这是我的代码：

如果我输入一些简单的东西，就像echo Hello world它按预期返回一样，Hello World. 当我键入或包含新行的内容时会出现问题dir（或者我猜到了，我对 ' 很陌生perl）。键入dir时，结果会打印在 perl shell 上（正如预期的那样，由于print(@cmd)，但随后也会打印usage: $sock->send(BUF, [FLAGS, [TO]]) at -e line 1.并退出，但我从未在 ncat 中收到该消息。

我正在从命令外壳运行命令作为单行： perl -e "use strict; use IO::Socket; my($sock, $newmsg, $cmd, $MAXLEN, $PORTNO); $MAXLEN = 1024; $PORTNO = 4444; $sock = IO::Socket::INET->new(LocalPort => $PORTNO, Proto => 'udp'); while ($sock->recv($newmsg, $MAXLEN)) {my($port, $ipaddr) = sockaddr_in($sock->peername);my @cmd = qx($newmsg);print(@cmd);$sock->send(@cmd);}"

我该怎么做才能将内容打印为目录？

我希望你们都做得很好。我正在开发一个聊天模块，我可以在其中录制语音备忘录/笔记。我的录制语音功能运行良好，但我想添加像 WhatsApp 这样的滑动手势。我想在按住按钮的同时向右滑动来停止录制。我正在寻找这样的东西：

WhatsApp的视频

谢谢