my $query = new CGI;
    print $query->header(-cookie => $c);

##</code><code>##

    $r->content_type("text/html");
    $r->header_out("Set-Cookie", $c);
    $r->send_http_header;