How do I access HTTP request headers in HTTP::Server::Simple::CGI?

Question

I'm using HTTP::Server::Simple::CGI for a light-weight HTTP server. That gives me a CGI object in a callback function when a HTTP request is accepted.

How can I access the incoming HTTP headers, especially non-standard headers? The environment variables are only the standard ones.

cgi->param gives me only the form parameters.

Thanks! chris

chris, I substituted attributes for headers in your question. If that's not what you meant, roll back my change. — daxim
– daxim, Commented Jun 22, 2010 at 13:11

user181548 · Accepted Answer · 2010-06-22 12:48:32Z

2

It says in the documentation:

You can, if you really want, define parse_headers() and parse them raw yourself.

answered Jun 22, 2010 at 12:48

user181548

Sign up to request clarification or add additional context in comments.

1 Comment

chris01 Over a year ago

thanks! you put me on the right way! function headers will give me the arguments without parsing for myself. regards, chris

gregn3 · Accepted Answer · 2016-03-18 13:57:37Z

0

Define the headers method to receive the headers.

sub headers
{
    my $self = shift;
    my $headers = shift;
    my @h = @{$headers};

    while (0 + @h)
    {
        my $k = shift @h;
        my $v = shift @h;

        print STDERR "header >> $k: $v\n";
    }
}

edited Mar 18, 2016 at 13:57

answered Mar 18, 2016 at 12:25

gregn3

1,8042 gold badges21 silver badges27 bronze badges

Collectives™ on Stack Overflow

How do I access HTTP request headers in HTTP::Server::Simple::CGI?

2 Answers 2

1 Comment

Comments

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

1 Comment

Comments

Your Answer

Sign up or log in

Post as a guest

Linked

Related