Select Code to Download

my $sessionidCookie = $cgi->cookie(
-name => 'sessionid',
...
-expires => '+5h');
        
print $cgi->redirect(-cookie => $sessionidCookie,-uri => './?a=');

my $sessionid = $cgi->cookie("sessionid");