DBIx::Class::InflateColumn::Path::Class - DBIx::Class::InflateColumn::Path::Class documentation

DBIx-Class-InflateColumn-Path-Class documentation Contained in the DBIx-Class-InflateColumn-Path-Class distribution.

Index

Code Index:

NAME

Top

DBIx::Class::InflateColumn::Path::Class inflate / deflate values into Path::Class::File or Path::Class::Dir objects

SYNOPSIS

Top

  __PACKAGE__->load_components(qw/InflateColumn::Path::Class Core/);
  __PACKAGE__->add_columns(
      file_path => {
          datatype => 'TEXT',
          size     => 65535,
          is_nullable => 1,
          is_file => 1, #or is_dir => 1
      },
  )

  #...

   $obj->file_path->basename;

DESCRIPTION

Top

This module inflates/deflates designated columns into Path::Class::File or Path::Class::Dir objects.

METHODS

Top

register_column

Extends the original method to setup inflators and deflators for the column. This is an internal method and you should never really have to use it.

SEE ALSO

Top

Path::Class DBIx::Class DBIx::Class::InflateColumn

AUTHOR

Top

Guillermo Roditi (groditi) <groditi@cpan.org>

COPYRIGHT AND LICENSE

Top

Copyright (C) 2008 by Guillermo Roditi

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

DBIx-Class-InflateColumn-Path-Class documentation Contained in the DBIx-Class-InflateColumn-Path-Class distribution. 
package DBIx::Class::InflateColumn::Path::Class;

use strict;
use warnings;
use Path::Class;

our $VERSION = '0.001001';

sub register_column {
  my ($self, $column, $info, @rest) = @_;
  $self->next::method($column, $info, @rest);

  my $inflate;
  if( exists $info->{'is_file'} || $info->{'is_file'} ){
    $inflate = sub { return Path::Class::file(shift) };
  } elsif( exists $info->{'is_dir'} || $info->{'is_dir'} ){
    $inflate = sub { return Path::Class::dir(shift) };
  } else {
    return;
  }

  $self->inflate_column
    (
     $column => {
                 inflate => $inflate,
                 deflate => sub { return shift->stringify },
                }
    );
}

1;

__END__;