$hash = $q->cookie(-name=>'sessionid',-value=>'$id',-expires=>'+1d'); print $q->header(-cookie=>$hash); print " ";