Select Code to Download

use CGI;
my $query = new CGI;
...
    -expires => '+15m'); #no activity in 15min...gone!

print $query->header(-cookie => $newcookie); #write it

my $user = $query->cookie('arbitrarycookiename'); #read it
if ($user) { $stillloggedin } else { &loggin() }