ZMQ::LibZMQ3 and AnyEvent
file: bin/anyevent_req_rep_hello_world_server.pl 12: my $w = AnyEvent->io( 13: fh => $fd, 14: poll => "r", 15: cb => sub { 16: my $msg = zmq_msg_data(zmq_recvmsg($server)); 17: say "server got >$msg<"; 18: zmq_send( $server, "Hello $msg!" ); 19: say "replied with >Hello $msg!<"; 20: }, 21: ); 22: AnyEvent->condvar->recv;
using the 0MQ file descriptor, polling on read events