$cookie = $query->cookie(-name=>$name,
                         -value=>$value,
                         -expires=>'+1h');
print $query->header(-cookie=>$cookie);