my $cookie = $q->cookie(-name=>'sess_id',-value=>$session{'_session_id'}); print $q->header(-cookie=>$cookie);