Select Code to Download

package CGI::Armature::Bridge;

...
}

1;

package CGI::Armature::Serializer;

...
}

1;

use CGI::Armature::Serializer;
use XML::Simple;
...
    XML::Simple->new(suppressempty=>q{}, noattr=>1),
    $serialize_map,
);

use CGI::Armature::Serializer;
use YAML;
...
    YAML->new(),
    $serialize_map,
);

$data = $serializer->serialize($data_hash);

$data_hash = $serializer->deserialize($data);

package CGI::Armature::Storage;

...
}

1;

package CGI::Armature::Database;

...
}

1;

use CGI::Armature::Storage;
use CGI::Armature::Database;
...
);

my $data = $storage->fetch($session_id);