| App-Context documentation | Contained in the App-Context distribution. |
App::Serializer::Storable - Interface for serialization and deserialization
use App;
$context = App->context();
$serializer = $context->service("Serializer"); # or ...
$serializer = $context->serializer();
$data = {
an => 'arbitrary',
collection => [ 'of', 'data', ],
of => {
arbitrary => 'depth',
},
};
$stor = $serializer->serialize($data);
$data = $serializer->deserialize($stor);
print $serializer->dump($data), "\n";
A Serializer allows you to serialize a structure of data of arbitrary depth to a scalar and deserialize it back to the structure.
The Storable serializer uses the Storable class to perform the deserialization and serialization.
* Throws: App::Exception::Serializer * Since: 0.01
The class is entirely made up of static (class) methods. However, they are each intended to be called as methods on the instance itself.
The constructor is inherited from
App::Service|App::Service/"new()".
* Signature: $stor = $serializer->serialize($data);
* Param: $data ref
* Return: $stor binary
* Throws: App::Exception::Serializer
* Since: 0.01
Sample Usage:
$context = App->context();
$serializer = $context->service("Serializer"); # or ...
$serializer = $context->serializer();
$data = {
an => 'arbitrary',
collection => [ 'of', 'data', ],
of => {
arbitrary => 'depth',
},
};
$stor = $serializer->serialize($data);
* Signature: $data = $serializer->deserialize($stor);
* Signature: $data = App::Serializer->deserialize($stor);
* Param: $data ref
* Return: $stor binary
* Throws: App::Exception::Serializer
* Since: 0.01
Sample Usage:
$context = App->context();
$serializer = $context->service("Serializer"); # or ...
$serializer = $context->serializer();
$data = $serializer->deserialize($stor);
print $serializer->dump($data), "\n";
* Signature: $serialized_content_type = $service->serialized_content_type();
* Param: void
* Return: $serialized_content_type string
* Throws: App::Exception
* Since: 0.01
Sample Usage:
$serialized_content_type = $service->serialized_content_type();
This method is inherited from
App::Serializer|App::Serializer/"dump()".
* Author: Stephen Adkins <spadkins@gmail.com> * License: This is free software. It is licensed under the same terms as Perl itself.
App::Context|App::Context,
App::Service|App::Service
| App-Context documentation | Contained in the App-Context distribution. |
############################################################################# ## $Id: Storable.pm 6783 2006-08-11 17:43:28Z spadkins $ ############################################################################# package App::Serializer::Storable; $VERSION = (q$Revision: 6783 $ =~ /(\d[\d\.]*)/)[0]; # VERSION numbers generated by svn use App; use App::Serializer; @ISA = ( "App::Serializer" ); use strict;
############################################################################# # CLASS #############################################################################
############################################################################# # CONSTRUCTOR METHODS #############################################################################
############################################################################# # new() #############################################################################
############################################################################# # PUBLIC METHODS #############################################################################
############################################################################# # serialize() #############################################################################
use Storable qw(freeze thaw); sub serialize { my ($self, $data) = @_; my ($stor); $stor = freeze($data); return $stor; } ############################################################################# # deserialize() #############################################################################
sub deserialize { my ($self, $stor) = @_; my ($data); $data = thaw($stor); return $data; } ############################################################################# # serialized_content_type() #############################################################################
sub serialized_content_type { #'application/octet-stream'; # probably should be this 'text/plain'; # use this for now } ############################################################################# # dump() #############################################################################
1;