s converted to JSON and then stored as Base64 string.
=cut
package NetSDS::Queue;
use 5.8.0;
use strict;
use warnings;
use Cache::Memcached::Fast;
use NetSDS::Util::Convert;
use JSON;
use base qw
my ($struct) = @_;
return conv_str_base64( encode_json($struct) );
}
sub _decode {
my ($string) = @_;
if ($string) {
return decode_json( conv_base64_str($string) );
} else {
return undef****************************************
=item B<process()> - main JSON-RPC iteration
This is internal method that implements JSON-RPC call processing.
=cut
#--------------------------------------