Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- my $context = ZeroMQ::Context->new();
- my $json = JSON->new->allow_nonref(1);
- my $socket = $context->socket(ZMQ_REQ);
- $socket->connect($server_url);
- for(my $i = 0;$i < 10;$i++) {
- $socket->send($i);
- my $answer = $json->decode($socket->recv()->data);
- }
Advertisement
Add Comment
Please, Sign In to add comment