DB-Object

 view release on metacpan or  search on metacpan

lib/DB/Object.pm  view on Meta::CPAN

        {
            $self->{sth} = $sth;
        }
        $repo->unlock if( $repo );
    }
    else
    {
        $repo->unlock if( $repo );
    }

    # Ensure we unlock even if sth came from mem cache path where we unlocked earlier
    $repo->unlock if( $repo );

    # Attach query object to statement (this can be dangerous if the statement is long-lived;
    # keep your query object small / reset/dirty it aggressively)
    $sth->query_object( $q ) if( $dbo->_is_a( $q, "${base_class}::Query" ) );
    $sth->table_object( $self ) if( $self->isa( "${base_class}::Tables" ) );

    # Caching the query as a constant
    if( $q && $dbo->_is_object( $q ) && $q->isa( "${base_class}::Query" ) )
    {

lib/DB/Object/Constraint/Check.pm  view on Meta::CPAN

=encoding utf-8

=head1 NAME

DB::Object::Constraint::Check - Table Check Constraint Class

=head1 SYNOPSIS

    use DB::Object::Constraint::Check;
    my $check = DB::Object::Constraint::Check->new(
        expr => q{CHECK (status::text ~* '^(active|inactive|locked|pending|protected|removed|suspended)$'::text)},
        fields => [qw( status )],
        name => 'chk_users_status',
    ) || die( DB::Object::Constraint::Check->error, "\n" );

=head1 VERSION

    v0.2.0

=head1 DESCRIPTION

lib/DB/Object/Mysql/Tables.pm  view on Meta::CPAN

A column name to column data type hash reference

=back

=head2 table_info

This is an alias for L<DB::Object::Mysql/table_info>

=head2 unlock

This will unlock a previously locked table.

If an argument is provided, this calls instead C<CORE::unlock> passing it whatever parameters provided.

Otherwise, it will prepare a query C<UNLOCK TABLES> and returns the statement handler.

If it is called in void context, this will execute the statement handler immediately.

See L<MyQL documentation for more information|https://dev.mysql.com/doc/refman/5.7/en/lock-tables.html>

=head1 SEE ALSO

lib/DB/Object/Postgres/Tables.pm  view on Meta::CPAN

A column name to column data type hash reference

=back

=head2 table_info

This is an alias for L<DB::Object::Postgres/table_info>

=head2 unlock

This will unlock a previously locked table.

If an argument is provided, this calls instead C<CORE::unlock> passing it whatever parameters provided.

Otherwise, it will prepare a query C<UNLOCK TABLES> and returns the statement handler.

If it is called in void context, this will execute the statement handler immediately.

=head1 SEE ALSO

L<perl>