my $cookie = $q->cookie( -name => 'session', -value => '123456', -expires => '+1h', -path => '/cgi-bin/admin/', -domain => '.somehost.com', -secure => 1); print $q->header( -cookie => $cookie );