NAME

Storm::Policy - Define how types are stored/retrieve from the database

SYNOPSIS

package MyPolicy;
use Storm::Policy;
use Moose::Util::TypeConstraints;
use DateTime::Format::SQLite;

class_type 'DateTime',
    { class => 'DateTime' };

define 'DateTime', 'DATETIME';

transform 'DateTime',
    inflate { DateTime::Format::SQLite->parse_datetime( $_ ) },
    deflate { DateTime::Format::SQLite->format_datetime( $_ ) };


# and then later

$storm = Storm->new( source => ... , policy => 'MyPolicy' );

DESCRIPTION

The policy defines how data is stored in the database. Storm::Policy provides sugar for defining the data type for the DBMS and transforming values on inflation/deflation.

SUGAR

define $type, $dbms_type

define declares the data type to be used by the DBMS (Database Management Software) when storing values of the given $type.

transform inflate \&func, deflate \&func

transform is used to declare how values of the given type will be serialized when stored to the database. Using transformations can allow you to store complex objects.

The deflate function is used when storing value to the database. $_ is the value to be deflated, and the return value is what will be saved to the database.

The inflate function is used when retrieving the value from the database. $_ is the value to be inflated, and the return value is the value Storm will use.

AUTHOR

Jeffrey Ray Hallock <jeffrey.hallock at gmail dot com>

Modified from code in Dave Rolsky's Fey::ORM module.

COPYRIGHT

Copyright (c) 2010 Jeffrey Ray Hallock. All rights reserved.
This program is free software; you can redistribute it and/or
modify it under the same terms as Perl itself.