將Perl腳本連接到WebSocket（使用Mojolicious）

Question

這是我的問題：我有一個使用mojolicious的API，一個外部腳本perl和一個JS文件，我想以這種方式連接它們：外部腳本會啟動一個隨機POST請求，如果成功，則必須發送網絡套接字中顯示“成功”消息。 如果發生錯誤，則必須發送“錯誤”。 API上的websocket只會中繼將使用它的JS消息。

我如何想象代碼是：

在Mojolicious啟動器腳本中：

websocket '/foo' => sub {
 $self->on(message => sub {
  my ($self, $msg) = @_;
  $self->send($msg);
 });
};

收到消息后發送

在JS文件中：

var ws = new WebSocket('ws://api/foo'); 
ws.onmessage = function(msg){
 if(msg == "Error") {console.log("got an error")};
 else if(msg == "Success") {console.log("got a success")};
};

那么，如何將我的外部腳本連接到Websocket，並能夠發送“錯誤”或“成功”？ （此外部腳本與Web服務器無關，它位於其他位置，正在執行其他操作）。

Answer 1

我了解您需要一個簡單的Perl腳本，該腳本可以連接到具有websocket端點的Mojolicious Web服務器。 外部perl腳本應連接到websocket服務器並發送一些消息。 然后，WebSocket服務器可以將這些消息重新分發給其他客戶端。

檢查我的github，您可以在上面找到以上場景。

Perl Mojolicious網絡套接字