view release on metacpan or  search on metacpan

lib/FeyX/Active/Table.pm  view on Meta::CPAN

    my $self   = shift;
    my $insert = FeyX::Active::SQL::Insert->new(
        dbh => $self->schema->dbi_manager->default_source->dbh
    );

    $insert->into( $self );
    $insert->values( @_ ) if @_;
    $insert;
}

sub update {
    my $self   = shift;
    my $update = FeyX::Active::SQL::Update->new(
        dbh => $self->schema->dbi_manager->default_source->dbh
    );

    $update->update( $self );
    $update->set( @_ ) if @_;
    $update;
}