Session Expiration Problem

Do you have a question? Post it now! No Registration Necessary.  Now with pictures!

Hi All,

This is the coding i have writtern to create the session in Perl.but i
getting session expired with in 5 min even if i m contineously wroking
onthe page.

  $userid = $FORM;
  $password = $FORM;

  $session = new CGI::Session("driver:File",undef,{'Directory'=>"/
  $sid = $session->id();

  # Write the session variable on the server
#  $session->param('password',$password);

  #create session cookie
  $cookie = $query->cookie(CGISESSID => $session->id);

  #session  expire

this code checks for the session existence

    $session = new CGI::Session(undef, $sid, );
      print $query->header( -cookie=>$cookie );
    $username_session = $session->param('username');
    if ($username_session eq "") {
        &print_session_exp_header(" -- Session Expired -- ","Session
        print "<h5>Please Relogin in Different Browser</h5>";

i dont know where i m going wrong.
can anyone plz correct with i have done any mistake or pointer to
correct the mistake.

thaks in advance

Site Timeline