The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

DBIx::Class::ResultSource - Result source object

SYNOPSIS

DESCRIPTION

A ResultSource is a component of a schema from which results can be directly retrieved, most usually a table (see DBIx::Class::ResultSource::Table)

METHODS

add_columns

  $table->add_columns(qw/col1 col2 col3/);

  $table->add_columns('col1' => \%col1_info, 'col2' => \%col2_info, ...);

Adds columns to the result source. If supplied key => hashref pairs uses the hashref as the column_info for that column.

Repeated calls of this method will add more columns, not replace them.

The contents of the column_info are not set in stone, the following keys are currently recognised/used by DBIx::Class.

accessor

Use this to set the name of the accessor for this column. If unset, the name of the column will be used.

data_type

This contains the column type, it is automatically filled by the SQL::Translator::Producer::DBIx::Class::File producer, and the DBIx::Class::Schema::Loader module. If you do not enter the data_type, DBIx::Class will attempt to retrieve it from the database for you, using DBIs column_info method. The values of this key are typically upper-cased.

Currently there is no standard set of values for the data_type, use whatever your database(s) support.

size

The length of your column, if it is a column type that can have a size restriction. This is currently not used by DBIx::Class.

is_nullable

If the column is allowed to contain NULL values, set a true value (typically 1), here. This is currently not used by DBIx::Class.

is_auto_increment

Set this to a true value if this is a column that is somehow automatically filled. This is used to determine which columns to empty when cloning objects using copy.

is_foreign_key

Set this to a true value if this column represents a key from a foreign table. This is currently not used by DBIx::Class.

default_value

Set this to the default value which will be inserted into this column by the database. Can contain either values or functions. This is currently not used by DBIx::Class.

sequence

Sets the name of the sequence to use to generate values. If not specified, DBIx::Class::PK::Auto will attempt to retrieve the name of the sequence from the database automatically.

add_column

  $table->add_column('col' => \%info?);

Convenience alias to add_columns

has_column

  if ($obj->has_column($col)) { ... }

Returns 1 if the source has a column of this name, 0 otherwise.

column_info

  my $info = $obj->column_info($col);

Returns the column metadata hashref for a column. See the description of add_column for information on the contents of the hashref.

columns

  my @column_names = $obj->columns;

Returns all column names in the order they were declared to add_columns

set_primary_key

Arguments: @cols

Defines one or more columns as primary key for this source. Should be called after add_columns.

Additionally, defines a unique constraint named primary.

The primary key columns are used by DBIx::Class::PK::Auto to retrieve automatically created values from the database.

primary_columns

Read-only accessor which returns the list of primary keys.

add_unique_constraint

Declare a unique constraint on this source. Call once for each unique constraint. Unique constraints are used when you call find on a DBIx::Class::ResultSet, only columns in the constraint are searched,

e.g.,

  # For UNIQUE (column1, column2)
  __PACKAGE__->add_unique_constraint(
    constraint_name => [ qw/column1 column2/ ],
  );

unique_constraints

Read-only accessor which returns the list of unique constraints on this source.

from

Returns an expression of the source to be supplied to storage to specify retrieval from this source; in the case of a database the required FROM clause contents.

storage

Returns the storage handle for the current schema.

See also: DBIx::Class::Storage

add_relationship

  $source->add_relationship('relname', 'related_source', $cond, $attrs);

The relationship name can be arbitrary, but must be unique for each relationship attached to this result source. 'related_source' should be the name with which the related result source was registered with the current schema. For example:

  $schema->source('Book')->add_relationship('reviews', 'Review', {
    'foreign.book_id' => 'self.id',
  });

The condition $cond needs to be an SQL::Abstract-style representation of the join between the tables. For example, if you're creating a rel from Author to Book,

  { 'foreign.author_id' => 'self.id' }

will result in the JOIN clause

  author me JOIN book foreign ON foreign.author_id = me.id

You can specify as many foreign => self mappings as necessary.

Valid attributes are as follows:

join_type

Explicitly specifies the type of join to use in the relationship. Any SQL join type is valid, e.g. LEFT or RIGHT. It will be placed in the SQL command immediately before JOIN.

proxy

An arrayref containing a list of accessors in the foreign class to proxy in the main class. If, for example, you do the following:

  CD->might_have(liner_notes => 'LinerNotes', undef, {
    proxy => [ qw/notes/ ],
  });
  

Then, assuming LinerNotes has an accessor named notes, you can do:

  my $cd = CD->find(1);
  $cd->notes('Notes go here'); # set notes -- LinerNotes object is
                               # created if it doesn't exist
accessor

Specifies the type of accessor that should be created for the relationship. Valid values are single (for when there is only a single related object), multi (when there can be many), and filter (for when there is a single related object, but you also want the relationship accessor to double as a column accessor). For multi accessors, an add_to_* method is also created, which calls create_related for the relationship.

relationships

Returns all valid relationship names for this source

relationship_info

Arguments: $relname

Returns the relationship information for the specified relationship name

has_relationship

Arguments: $rel

Returns 1 if the source has a relationship of this name, 0 otherwise.

resolve_join

Arguments: $relation

Returns the join structure required for the related result source

resolve_condition

Arguments: $cond, $as, $alias|$object

Resolves the passed condition to a concrete query fragment. If given an alias, returns a join condition; if given an object, inverts that object to produce a related conditional from that object.

resolve_prefetch

Arguments: hashref/arrayref/scalar

Accepts one or more relationships for the current source and returns an array of column names for each of those relationships. Column names are prefixed relative to the current source, in accordance with where they appear in the supplied relationships. Examples:

  my $source = $schema->resultset('Tag')->source;
  @columns = $source->resolve_prefetch( { cd => 'artist' } );

  # @columns =
  #(
  #  'cd.cdid',
  #  'cd.artist',
  #  'cd.title',
  #  'cd.year',
  #  'cd.artist.artistid',
  #  'cd.artist.name'
  #)

  @columns = $source->resolve_prefetch( qw[/ cd /] );

  # @columns =
  #(
  #   'cd.cdid',
  #   'cd.artist',
  #   'cd.title',
  #   'cd.year'
  #)

  $source = $schema->resultset('CD')->source;
  @columns = $source->resolve_prefetch( qw[/ artist producer /] );

  # @columns =
  #(
  #  'artist.artistid',
  #  'artist.name',
  #  'producer.producerid',
  #  'producer.name'
  #)  
Arguments: $relname

Returns the result source object for the given relationship

Arguments: $relname

Returns the class object for the given relationship

resultset

Returns a resultset for the given source. This will initially be created on demand by calling

  $self->resultset_class->new($self, $self->resultset_attributes)

but is cached from then on unless resultset_class changes.

resultset_class

Set the class of the resultset, this is useful if you want to create your own resultset methods. Create your own class derived from DBIx::Class::ResultSet, and set it here.

resultset_attributes

Specify here any attributes you wish to pass to your specialised resultset.

throw_exception

See throw_exception in DBIx::Class::Schema.

AUTHORS

Matt S. Trout <mst@shadowcatsystems.co.uk>

LICENSE

You may distribute this code under the same terms as Perl itself.