Einfache Perl websocket Client

Question

Ich versuche, eine einfache websocket Client in Perl zu schreiben:

use Protocol::WebSocket::Client; 

my $client = Protocol::WebSocket->new(url => 'ws://myserver:port'); 

# Sends a correct handshake header 
$client->connect; 

# Register on connect handler 
$client->on(
    connect => sub { 
     $client->write('hi there'); 
    } 
); 

# Parses incoming data and on every frame calls on_read 
$client->read($reply); 
print "$reply\n"; 

# Sends correct close header 
$client->disconnect; 

wie in the documentation for Protocol::WebSocket::Client gezeigt, aber ich erhalte die Meldung:

Can't locate object method "new" via package "Protocol::WebSocket" at ./webSocketClient.pl. 

Was mache ich falsch ?

Answer 1

Im Beispielcode ist ein Fehler aufgetreten. Protocol::WebSocket->new sollte Protocol::WebSocket::Client->new sein

Answer 2

Protocol::WebSocket ist eine Low-Level-Implementierung von WebSocket Protokoll. Es enthält nicht den Code, der Daten sendet/empfängt; Es analysiert nur die Protokollnachrichten.

Sie könnten Beispiele für die Verwendung von Protocol::WebSocket mit verschiedenen Modulen suchen, siehe examples. Ein gutes Client-Beispiel ist in dem wsconsole-Dienstprogramm implementiert, das mit diesem Modul geliefert wird.

Es gibt mehrere High-Level-Module auf CPAN, die WebSockets implementieren, die alle Low-Level-Zeug verstecken, und die meisten von ihnen verwenden Protocol::WebSocket. Werfen Sie einen Blick auf AnyEvent::WebSocket::Client oder Net::Async::WebSocket::Client.