Here is a code snippet which show how to store data into the session.
Code: Perl
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]);