How to fetch HTTP headers in perl when using CGI

Question

I\'m using Perl/CGI/Apache and want to fetch the X-Forwarded-For HTTP header. How do I do that?

Answer 1

Except for a few headers that are handled specially, CGI stores the value of Header-Name: in the environment variable HTTP_HEADER_NAME. So, X-Forwarded-For (if present in the request) should be found in $ENV{HTTP_X_FORWARDED_FOR}.