MooseX::Storage::Util − A MooseX::Storage swiss−army chainsaw
This module provides a set of tools, some sharp and focused, others more blunt and crude. But no matter what, they are useful bits to have around when dealing with MooseX::Storage code.
All the methods in this package are class methods and should be called appropriately.
peek ($data, %options)
This method will help you to verify that the serialized class you have gotten is what you expect it to be before you actually unfreeze/unpack it.
The $data can be either a perl HASH ref or some kind of serialized data ( JSON , YAML , etc.).
The %options are as follows:
If this is left blank, we assume that $data is a plain perl HASH ref otherwise we attempt to inflate $data based on the value of this option.
Currently only JSON and YAML are supported here.
The default is to try and extract the class name, but if you want to check another key in the data, you can set this option. It will return the value found in the key for you.
Add more stuff to this module :)
All complex software has bugs lurking in it, and this module is no exception. If you find a bug please either email me, or add the bug to cpan-RT.
Stevan Little <stevan DOT little AT iinteractive DOT com>
Copyright 2007−2008 by Infinity Interactive, Inc.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.