Deprecated.
The maintainer of this distribution has indicated that it is deprecated and no longer suitable for use.
NAME
ZMQx::RPC::Message::Request - DEPRECATED - A unfinished prototype, do not use
VERSION
version 0.008
my %payload = ( foo=>42 );
my $msg = ZMQx::RPC::Message->pack(
'something',
{
type=>'JSON',
timeout=>1000, # milisecs
},
\%payload
)
# $msg = ['something','JSON;1000','{"foo":42}'] # payload converted to JSON
my ($command, $header, @payload) = ZMQx::RPC::Message->unpack($msg);
$payload[0]->{foo} # 42
my @list = (42,'töst',47);
my $msg2 = ZMQx::RPC::Message->pack(
'something_else',
{ },
@list
)
# $msg2 = ['something_else','string;500','42','t\303\266st','47']
my $msg3 = ZMQx::RPC::Message->pack(
'something_else',
{
type=>'raw'
},
slurp('foo.jpg') # slurp() shall return the raw jpg data
)
# $msg3 = ['something_else','raw;500','...']
my @payloads = ({ foo=>42 }, [ 'bar', 8 ]);
my $msg4 = ZMQx::RPC::Message->pack(
'cmd',
{
type=>'JSON'
},
@payloads
)
# $msg4 = ['cmd','JSON;1000','{"foo":42}','["bar",8]']
my $curry = ZMQx::RPC::Message->prepare(
'something_else',
{ },
);
my $msg = $curry->(@payload);
AUTHOR
Thomas Klausner <domm@plix.at>
COPYRIGHT AND LICENSE
This software is copyright (c) 2013 - 2015 by Validad AG.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.