Apache-Session-Browseable
view release on metacpan or search on metacpan
1.3.16
- Optimize deleteIfLowerThan for Redis
1.3.15
- Improve Redis driver performance
- Implement searchOn/deleteIfLowerThan into Redis
- Prefer Redis::Fast
1.3.14
- restrict mysql_enable_utf8 to DBD::mysql
- PgJSON: Fix GKFAS when called with a column list
1.3.13
- Fix versions
- Update Cassandra doc
1.3.12
- Add Cassandra support via DBD::Cassandra
1.3.11
lib/Apache/Session/Browseable/DBI.pm view on Meta::CPAN
my $username = $args->{UserName};
my $password = $args->{Password};
my $dbh =
DBI->connect_cached( $datasource, $username, $password,
{ RaiseError => 1, AutoCommit => 1 } )
|| die $DBI::errstr;
if ( $datasource =~ /^dbi:sqlite/i ) {
$dbh->{sqlite_unicode} = 1;
}
elsif ( $datasource =~ /^dbi:mysql/i ) {
$dbh->{mysql_enable_utf8} = 1;
}
elsif ( $datasource =~ /^dbi:pg/i ) {
$dbh->{pg_enable_utf8} = 1;
}
return $dbh;
}
1;
lib/Apache/Session/Browseable/MySQLJSON.pm view on Meta::CPAN
sub _classDbh {
my ( $class, $args ) = @_;
my $datasource = $args->{DataSource} or die "No datasource given !";
my $username = $args->{UserName};
my $password = $args->{Password};
my $dbh =
DBI->connect_cached( $datasource, $username, $password,
{ RaiseError => 1, AutoCommit => 1 } )
|| die $DBI::errstr;
$dbh->{mysql_enable_utf8} = 1;
return $dbh;
}
1;
__END__
=head1 NAME
Apache::Session::Browseable::MySQL - Add index and search methods to
Apache::Session::MySQL
lib/Apache/Session/Browseable/Store/MySQL.pm view on Meta::CPAN
use Apache::Session::Store::MySQL;
our @ISA =
qw(Apache::Session::Browseable::Store::DBI Apache::Session::Store::MySQL);
our $VERSION = '1.2.2';
sub connection {
my($self,$session)=@_;
$self->SUPER::connection($session);
if ( $self->{dbh}->{Driver}->{Name} eq "mysql" ) {
$self->{dbh}->{mysql_enable_utf8} = 1;
}
}
1;
( run in 0.285 second using v1.01-cache-2.11-cpan-00829025b61 )