alues are:
'' for none
'storable' for 'Storable'
'sereal' for 'Sereal'
'json' for 'JSON'
[ $s, $d ] for custom serializer/de-serializer
If this parameter has a value the modu
eq 'json') {
eval "require JSON;"
|| die "Could not load serialization package: JSON : $@";
my $JSON = JSON->new->utf8->allow_nonref;
$Self->{serialize} = sub { $JSON->enc
ode(${$_[0]}); };
$Self->{deserialize} = sub { \$JSON->decode($_[0]); };
} else {
die "Unrecognized value >$serializer< for `serializer` parameter";
}
}
# Compress stored valu