table of contents
Apache::Session::Browseable::Postgres(3pm) | User Contributed Perl Documentation | Apache::Session::Browseable::Postgres(3pm) |
NAME¶
Apache::Session::Browseable::Postgres - Add index and search methods to Apache::Session::Postgres
SYNOPSIS¶
Create table with columns for indexed fields. Example for Lemonldap::NG:
CREATE UNLOGGED TABLE sessions ( id varchar(64) not null primary key, a_session text, _whatToTrace text, _session_kind text, _utime bigint, ipAddr varchar(64) );
Add indexes:
CREATE INDEX uid1 ON sessions USING BTREE (_whatToTrace); CREATE INDEX s1 ON sessions (_session_kind); CREATE INDEX u1 ON sessions (_utime); CREATE INDEX ip1 ON sessions USING BTREE (ipAddr);
Use it with Perl:
use Apache::Session::Browseable::Postgres; my $args = { DataSource => 'dbi:Pg:sessions', UserName => $db_user, Password => $db_pass, Commit => 1, # Choose your browseable fileds Index => '_whatToTrace _session_kind _utime iAddr', }; # Use it like Apache::Session my %session; tie %session, 'Apache::Session::Browseable::Postgres', $id, $args; $session{uid} = 'me'; $session{mail} = 'me@me.com'; $session{unindexedField} = 'zz'; untie %session; # Apache::Session::Browseable add some global class methods # # 1) search on a field (indexed or not) my $hash = Apache::Session::Browseable::Postgres->searchOn( $args, 'uid', 'me' ); foreach my $id (keys %$hash) { print $id . ":" . $hash->{$id}->{mail} . "\n"; } # 2) Parse all sessions # a. get all sessions my $hash = Apache::Session::Browseable::Postgres->get_key_from_all_sessions(); # b. get some fields from all sessions my $hash = Apache::Session::Browseable::Postgres->get_key_from_all_sessions('uid', 'mail') # c. execute something with datas from each session : # Example : get uid and mail if mail domain is my $hash = Apache::Session::Browseable::Postgres->get_key_from_all_sessions( sub { my ( $session, $id ) = @_; if ( $session->{mail} =~ /mydomain.com$/ ) { return { $session->{uid}, $session->{mail} }; } } ); foreach my $id (keys %$hash) { print $id . ":" . $hash->{$id}->{uid} . "=>" . $hash->{$id}->{mail} . "\n"; }
DESCRIPTION¶
Apache::Session::Browseable provides some class methods to manipulate all sessions and add the capability to index some fields to make research faster.
Apache::Session::Browseable::Postgres implements it for PosqtgreSQL databases.
SEE ALSO¶
<http://lemonldap-ng.org>, Apache::Session::Postgres
COPYRIGHT AND LICENSE¶
- 2009-2023 by Xavier Guimard
- 2013-2023 by Clément Oudot
- 2019-2023 by Maxime Besson
- 2013-2023 by Worteks
- 2023 by Linagora
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.10.1 or, at your option, any later version of Perl 5 you may have available.
2024-12-19 | perl v5.40.0 |