The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Maypole::Headers - Convenience wrapper around HTTP::Headers

SYNOPSIS

    use Maypole::Headers;

    $r->headers_out(Maypole::Headers->new); # Note, automatic in Maypole
    $r->headers_out->set('Content-Base' => 'http://localhost/maypole');
    $r->headers_out->push('Set-Cookie' => $cookie->as_string);
    $r->headers_out->push('Set-Cookie' => $cookie2->as_string);

    print $r->headers_out->as_string;

DESCRIPTION

A convenience wrapper around HTTP::Headers. Additional methods are provided to make the mutators less repetitive and wordy. For example:

    $r->headers_out->header(Content_Base => $r->config->uri_base);

can be written as:

    $r->headers_out->set(Content_Base => $r->config->uri_base);

METHODS

All the standard HTTP::Headers methods, plus the following:

get($header)

Get the value of a header field.

An alias to HTTP::Headers->header

set($header =gt $value, ...)

Set the value of one or more header fields

An alias to HTTP::Headers->header

push($header =gt $value)

Add a value to the field named $header. Previous values are maintained.

An alias to HTTP::Headers->push_header

init($header =gt $value)

Set the value for the field named $header, but only if that header is currently undefined.

An alias to HTTP::Headers->init_header

remove($header, ...)

Remove one of more headers

An alias to HTTP::Headers->remove_header

field_names()

Returns a list of distinct header names

An alias to HTTP::Headers->header_field_names

SEE ALSO

HTTP::Headers

AUTHOR

Simon Flack