view release on metacpan or  search on metacpan

lib/Apache/Session/Store/SQLite3.pm  view on Meta::CPAN

    }

    $self->{insert_sth}->bind_param(1, $session->{data}->{_session_id}, SQL_CHAR);
    $self->{insert_sth}->bind_param(2, $session->{serialized}, SQL_BLOB);
    $self->{insert_sth}->bind_param(3, time, SQL_INTEGER);

    $self->{insert_sth}->execute;
    $self->{insert_sth}->finish;
}

sub update {
    my $self    = shift;
    my $session = shift;
 
    $self->connection($session);

    local $self->{dbh}->{RaiseError} = 1;

    if (!defined $self->{update_sth}) {
        $self->{update_sth} = $self->{dbh}->prepare_cached(qq[
             UPDATE $self->{'table_name'}