dbix::class::helper::resultset::autoremovecolumns(3pm) [debian man page]

DBIx::Class::Helper::ResultSet::AutoRemoveColumns(3pm)	User Contributed Perl Documentation DBIx::Class::Helper::ResultSet::AutoRemoveColumns(3pm)

NAME

       DBIx::Class::Helper::ResultSet::AutoRemoveColumns - Automatically remove columns from a ResultSet

VERSION

       version 2.013002

SYNOPSIS

	package MySchema::Result::Bar;

	use strict;
	use warnings;

	use parent 'DBIx::Class::Core';

	__PACKAGE__->table('KittenRobot');
	__PACKAGE__->add_columns(
	   id => {
	      data_type 	=> 'integer',
	      is_auto_increment => 1,
	   },
	   kitten => {
	      data_type 	=> 'integer',
	   },
	   robot => {
	      data_type 	=> 'text',
	      is_nullable	=> 1,
	   },
	   your_mom => {
	      data_type 	=> 'blob',
	      is_nullable	=> 1,
	      remove_column	=> 0,
	   },
	);

	1;

	package MySchema::ResultSet::Bar;

	use strict;
	use warnings;

	use parent 'DBIx::Class::ResultSet';

	__PACKAGE__->load_components('Helper::ResultSet::AutoRemoveColumns');

DESCRIPTION

       This component automatically removes "heavy-weight" columns.  To be specific, columns of type "text", "ntext", "blob", "clob", or "bytea".
       You may use the "remove_column" key in the column info to specify directly whether or not to remove the column automatically. See "NOTE" in
       DBIx::Class::Helper::ResultSet for a nice way to apply it to your entire schema.

METHODS

   _should_column_fetch
	$self->_should_column_fetch('kitten')

       returns true if a column should be fetched or not.  This fetches a column if it is not of type "text", "ntext", "blob", "clob", or "bytea"
       or the "remove_column" is set to true.  If you only wanted to explicitly state which columns to remove you might override this method like
       this:

	sub _should_column_fetch {
	   my ( $self, $column ) = @_;

	   my $info = $self->column_info($column);

	   return !defined $info->{remove_column} || $info->{remove_column};
	}

   fetchable_columns
       simply returns a list of columns that are fetchable.

AUTHOR

       Arthur Axel "fREW" Schmidt <frioux+cpan@gmail.com>

COPYRIGHT AND LICENSE

       This software is copyright (c) 2012 by Arthur Axel "fREW" Schmidt.

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

perl v5.14.2							    2012-06-18		    DBIx::Class::Helper::ResultSet::AutoRemoveColumns(3pm)

DBIx::Class::Helper::Row::ProxyResultSetMethod(3pm)	User Contributed Perl Documentation    DBIx::Class::Helper::Row::ProxyResultSetMethod(3pm)

NAME

       DBIx::Class::Helper::Row::ProxyResultSetMethod - Efficiently reuse ResultSet methods from results

VERSION

       version 2.013002

SYNOPSIS

       ResultSet:

	package MyApp::Schema::ResultSet::Foo;

	use base 'DBIx::Class::ResultSet';

	__PACKAGE__->load_components(qw(
	   Helper::ResultSet::CorrelateRelationship
	));

	...;

	sub with_friend_count {
	   shift->search(undef, {
	      '+columns' => {
		 'friend_count' => $self->correlate('friends')->count_rs->as_query,
	      },
	   })
	}

       Result:

	package MyApp::Schema::Result::Foo;

	use base 'DBIx::Class::Core';

	__PACKAGE__->load_components(qw( Helper::Row::ProxyResultSetMethod ));

	__PACKAGE__->proxy_resultset_method('friend_count');

       or with DBIx::Class::Candy:

	package MyApp::Schema::Result::Foo;

	use DBIx::Class::Candy -components => ['Helper::Row::ProxyResultSetMethod'];

	proxy_resultset_method 'friend_count';

       Elsewhere:

	my $row = $foo_rs->first;
	say $row->friend_count . ' friends';

DESCRIPTION

       This module makes reusing resultset methods from a result trivially easy.  You should be using it.

METHODS

   proxy_resultset_method
	__PACKAGE__->proxy_resultset_method( $name => {
	   slot 	    => $slot,
	   resultset_method => $rs_method
	});

       "proxy_resultset_method"'s first argument is the name of the method to generate and is required.  The other two arguments, $slot, and
       $resultset_method are optional.	If unspecified $slot will default to $name and $resultset_method will default to "with_$name".	$slot is
       the column that the data being retrieved is stored as in the ResultSet method being proxied to.	$resultset_method is (duh) the ResultSet
       method being proxied to.

CANDY EXPORTS

       If used in conjunction with DBIx::Class::Candy this component will export:

       proxy_resultset_method

DEDICATION

       This module is dedicated to Ray Bradbury, who wrote Something Wicked This Way Comes, Dandelion Wine, and numerous short stories, plays, etc
       etc.  Read this author's books.

AUTHOR

       Arthur Axel "fREW" Schmidt <frioux+cpan@gmail.com>

COPYRIGHT AND LICENSE

       This software is copyright (c) 2012 by Arthur Axel "fREW" Schmidt.

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

perl v5.14.2							    2012-06-18		       DBIx::Class::Helper::Row::ProxyResultSetMethod(3pm)