.
=item * L<NetSDS::App::FCGI> - FastCGI applicatrion framework
=item * L<NetSDS::App::JSRPC> - JSON-RPC server framework
=item * L<NetSDS::Conf> - configuration files management class.
=item * L<
ed data structure of object that may be used when some
code requires non blessed structures (like JSON serialization).
Example:
my $var = $obj->unbless();
=cut
#----------------------------------
from JSON string when interacting with Memcached.
=cut
package NetSDS::Session;
use 5.8.0;
use strict;
use warnings;
use version; our $VERSION = '1.301';
use Cache::Memcached::Fast;
use JSON;
us
{ address => $mc_host . ':' . $mc_port } ],
serialize_methods => [ \&JSON::encode_json, \&JSON::decode_json ],
}
);
if ( $self->{memcached} ) {
return $self;
} else {
return $cla
LSO
=over
=item * L<Cache::Memcached::Fast> - XS implementation of Memcached API
=item * L<JSON> - JSON encoding/decoding API
=back
=head1 AUTHORS
Michael Bochkaryov <misha@rattler.kiev.ua>
=he
============================
=head1 NAME
NetSDS::App::JSRPC - JSON-RPC server framework
=head1 SYNOPSIS
#!/usr/bin/env perl
# JSON-RPC server
use 5.8.0;
use warnings;
use strict;
JServer-
vailable via JSON-RPC
sub sum {
my ($self, $param) = @_;
return $$param[0] + $$param[1];
}
1;
=head1 DESCRIPTION
C<NetSDS::App::JSRPC> module implements framework for common JSON-RPC based
s
erver application. JSON-RPC is a HTTP based protocol providing remote
procudure call (RPC) functionality using JSON for requests and responses
incapsulation.
This implementation is based on L<NetSDS:
S EDR data is written to plain text files as JSON structures one row per record.
=cut
package NetSDS::EDR;
use 5.8.0;
use strict;
use warnings;
use JSON;
use NetSDS::Util::DateTime;
use base 'NetS
%params ) = @_;
my $self = $class->SUPER::new(%params);
# Create JSON encoder for EDR data processing
$self->{encoder} = JSON->new();
# Initialize file to write
if ( $params{filename} ) {
$
=item B<write($rec1 [,$rec2 [...,$recN]])> - write EDR to file
This methods converts records to JSON and write to file.
Each record writing to one separate string.
Example:
$edr->write({from => '