net::httpserver::session(3pm) [debian man page]

Net::HTTPServer::Session(3pm)				User Contributed Perl Documentation			     Net::HTTPServer::Session(3pm)

NAME

       Net::HTTPServer::Session - HTTP server side client session

SYNOPSIS

       Net::HTTPServer::Session handles server side client sessions

DESCRIPTION

       Net::HTTPServer::Session provides a server side data store for client specific sessions.  It uses a cookie stored on the browser to tell
       the server which session to restore to the user.  This is modelled after the PHP session concept.  The session is valid for 4 hours from
       the last time the cookie was sent.

EXAMPLES

       sub pageHandler {
	   my $request = shift;

	   my $session = $request->Session();

	   my $response = $request->Response();

	   # Logout
	   $session->Destroy() if $request->Env("logout");

	   $response->Print("<html><head><title>Hi there</title></head><body>");

	   # If the user specified a username on the URL, then save it.
	   if ($request->Env("username"))
	   {
	       $session->Set("username",$request->Env("username"));
	   }

	   # If there is a saved username, then use it.
	   if ($session->Get("username"))
	   {
	       $response->Print("Hello, ",$session->Get("username"),"!");
	   }
	   else
	   {
	       $response->Print("Hello, stranger!");
	   }

	   $response->Print("</body></html>");

	   return $response;
       }

       The above would behave as follows:

	 http://server/page		   - Hello, stranger!
	 http://server/page?username=Bob   - Hello, Bob!
	 http://server/page		   - Hello, Bob!
	 http://server/page?username=Fred  - Hello, Fred!
	 http://server/page		   - Hello, Fred!
	 http://server/page?logout=1	   - Hello, stranger!
	 http://server/page		   - Hello, stranger!

METHODS

   Delete(var)
       Delete the specified variable from the session.

   Destroy()
       Destroy the session.  The server side data is deleted and the cookie will be expired.

   Exists(var)
       Returns if the specified variable exists in the sesion.

   Get(var)
       Return the value of the specified variable from the session if it exists, undef otherwise.

   Set(var,value)
       Store the specified value (scalar or reference to any Perl data structure) in the session.

AUTHOR

       Ryan Eatmon

COPYRIGHT

       Copyright (c) 2003-2005 Ryan Eatmon <reatmon@mail.com>. All rights reserved.  This program is free software; you can redistribute it and/or
       modify it under the same terms as Perl itself.

perl v5.14.2							    2012-03-03					     Net::HTTPServer::Session(3pm)

Check Out this Related Man Page

Apache::Session::Browseable::Redis(3pm) 		User Contributed Perl Documentation		   Apache::Session::Browseable::Redis(3pm)

NAME

       Apache::Session::Browseable::Redis - Add index and search methods to Apache::Session::Redis

SYNOPSIS

	 use Apache::Session::Browseable::Redis;

	 my $args = {
	      server => '127.0.0.1:6379',

	      # Choose your browseable fileds
	      Index	     => 'uid mail',
	 };

	 # Use it like Apache::Session
	 my %session;
	 tie %session, 'Apache::Session::Browseable::Redis', $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::Redis->searchOn( $args, 'uid', 'me' );
	 foreach my $id (keys %$hash) {
	   print $id . ":" . $hash->{$id}->{mail} . "
";
	 }

	 # 2) Parse all sessions
	 # a. get all sessions
	 my $hash = Apache::Session::Browseable::Redis->get_key_from_all_sessions();

	 # b. get some fields from all sessions
	 my $hash = Apache::Session::Browseable::Redis->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::Redis->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} . "
";
	 }

DESCRIPTION

       Apache::Session::browseable provides some class methods to manipulate all sessions and add the capability to index some fields to make
       research faster.

SEE ALSO

       Apache::Session

AUTHOR

       Xavier Guimard, <x.guimard@free.fr>

COPYRIGHT AND LICENSE

       Copyright (C) 2009 by Xavier Guimard

       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.

perl v5.14.2							    2010-12-08				   Apache::Session::Browseable::Redis(3pm)

Linux and UNIX Man Pages

net::httpserver::session(3pm) [debian man page]

Check Out this Related Man Page