package My::DB::Object;

use My::DB;
use base qw(Rose::DB::Object);

sub init_db { 
    My::DB->new
}

__PACKAGE__->meta->column_type_class(
    'sha256' => 'My::DB::Column::Sha256'
)

1;


package My::DB::Column::Sha256;

use strict;

use Rose::DB::Object::Metadata::Column;
our @ISA = qw(Rose::DB::Object::Metadata::Column);

use Digest::SHA qw(sha256_hex);

sub type { 'sha256' }

sub format_value {
    my($self, $db, $value) = @_;
    
    return sha256_hex($value);
}

1;