REQ-REP Hello World
file: bin/raw_req_rep_hello_world_client.pl @c3e99e4d 1: #!/usr/bin/env perl 2: use 5.016; 3: use ZMQ::LibZMQ3; 4: use ZMQ::Constants qw(ZMQ_REQ); 5: 6: my $text = $ARGV[0] || 'World'; 7: 8: my $context = zmq_init(); 9: my $client = zmq_socket($context, ZMQ_REQ); 10: zmq_connect($client, 'tcp://localhost:10001'); 11: 12: zmq_send($client,$text); 13: say "client sent >$text<"; 14: 15: my $reply = zmq_msg_data(zmq_recvmsg($client)); 16: say "client got >$reply<";
the whole client