[Rakish]

I want to store the username and login_id in the session .

i am tryin to do this.

$session = $q->cookie(-name=>$session->name,-value=>$session->id); #session cookie
                 $session{"username"}   =        $q->param("$usernameVar");
                 $session{"login_id"}   =        $q->param("$login_id");
                 $cookie13 = $q->cookie(-name=>'login_id',-value=>$login_id); #cookie 1
                 print $q->header(-location=>'show_profile.pl',-cookie=>[$cookie13,$session]);

Software error:

Quote:

Global symbol "%session" requires explicit package name at /var/www/cgi-bin/catalog/testlogin.pl line 145.
Global symbol "%session" requires explicit package name at /var/www/cgi-bin/catalog/testlogin.pl line 146.
Execution of /var/www/cgi-bin/catalog/testlogin.pl aborted due to compilation errors.

I have defined the session variable as:

my $session;

if i just write

$session = $q->cookie(-name=>$session->name,-value=>$session->id); #session cookie
$cookie13 = $q->cookie(-name=>'login_id',-value=>$login_id); #cookie 1
print $q->header(-location=>'show_profile.pl',-cookie=>[$cookie13,$session]);

it works fine by just sending session cookie to the HTTP header.

Please help.

Rakesh

[naveen]

Hi,

$session{"username"}   =        $q->param("$usernameVar");
$session{"login_id"}   =        $q->param("$login_id");

Instead of this, try the following...

$uname=$q->param("$usernameVar");
$id=$q->param("$login_id");
$session.=$uname.$id;

Keep the rest of the code same.

[pradeep]

Here is a code snippet which show how to store data into the session.

use CGI::Session;
 
 $session = new CGI::Session();
 
 #save data to the session
 $session->param('username') = $q->param("$usernameVar");
 $session->param('login_id') = $q->param("$login_id");
 
 #create session cookie
 $session_cookie = $q->cookie(-name=>$session->name,-value=>$session->id); #session cookie
 $cookie13 = $q->cookie(-name=>'login_id',-value=>$login_id); #cookie 1
 
 print $q->header(-location=>'show_profile.pl',-cookie=>[$cookie13,$session]);

[Rakish]

Thanks Pradeep,