Посоветуйте клиент для вебсокетов

#!/usr/bin/env perl
use Net::Stomp;
 
my $s = Net::Stomp->new({ hostname => 'localhost', port => 61613 });
$s->connect;
 
while (1) {
$s->send({ destination => '/topic/streams', body => 'test lol ' . rand });
sleep 2;
}