Yet Another CPAN Grep

NRD-Daemon ( J/JL/JLMARTIN/NRD-Daemon-0.04.tar.gz, JLMARTIN, 2011; MetaCPAN )

NRD-Daemon/lib/NRD/Serialize/plain.pm ( view source; MetaCPAN )

package NRD::Serialize::plain;

use strict;
use warnings;

use JSON;

use base 'NRD::Serialize';

sub new {
  my ($class, $options) = @_;
  $options = {} if (not defined $options);
  my $self = {

 0 }

sub helo {
   return undef;
}

sub unfreeze {
   my ($self, $recieved) = @_;
   return decode_json($recieved);
}

sub freeze {
   my ($self, $result) = @_;
   return encode_json($result);
}

1;